Составить программу, которая подсчитывает общее количество общих количественных целых пятизначных чисел, которые удовлетворяют условиям: a) abcde - пятизначное число b) a, b, c, d - разные цифры c) ac-ce=a-b+c+d+e d) e - четное число в ответе запишите только число.
120
281
Ответы на вопрос:
Текст программы (pascal) var a,b,c,d,e: byte; k: integer; begin k: =0; for a: =1 to 9 do begin for b: =0 to 9 do if b< > a then begin for c: =0 to 9 do if (c< > a) and (c< > b) then begin for d: =0 to 9 do if (d< > a) and (d< > b) and (d< > c) then begin e: =0; repeat if a*c-c*e=a-b+c+d+e then inc(k); e: =e+2 until e< 9 end end end end; writeln(k) end. тестовое решение: 190
Популярно: Информатика
-
lida5004.08.2020 04:04
-
danik24rysskiy24.02.2023 22:35
-
nikitagarin215.03.2020 13:25
-
yuratihonov16.07.2022 17:01
-
Madina160621.01.2021 09:11
-
GABITOV201824.05.2023 14:46
-
navozovaleksejj26.04.2023 22:15
-
KarakatitsaKrutitsa05.08.2020 13:25
-
derotasgo11.08.2020 07:39
-
Nazar090501.09.2020 23:18