Найти все двузначные числа, которые делятся на n или содержат цифру n. (программа Паскаль)
185
204
Ответы на вопрос:
program z1;
uses crt;
var a,b,c,n,i: integer;
begin
read (n);
for a:=1 to 9 do
for b:=0 to 9 do
if ((a*100+b) mod n=0) or (a=n) or (b=n)then write ((a*100+b*10+c):4);
end.
uses crt;
var a,b,c,n,i: integer;
begin
read (n);
for a:=1 to 9 do
for b:=0 to 9 do
if ((a*100+b) mod n=0) or (a=n) or (b=n)then write ((a*100+b*10+c):4);
end.
дo рe ми фа сoль диeс ла си дo
дo ми сoль диeс дo
///
COРИИИИИИИИИИИИИИИИИИИИИИИИИИИИ
Объяснение:
Популярно: Другие предметы
-
Grister55521.03.2022 12:53
-
ep1cook1e11.09.2022 14:18
-
solovyovaolena05.10.2021 11:24
-
Qdiiit02.04.2020 21:43
-
nagimako28.05.2022 23:23
-
mrtimkarov31.10.2020 06:00
-
УРВ0505200126.12.2020 08:16
-
losangelina2305.12.2021 23:50
-
geralis728p0bgjl15.03.2021 14:54
-
тупая129408.04.2021 13:20