Предмет: Информатика,
автор: arthur5math
Напишите программу поиска все двузначных чисел, в которых есть цифра n, или само число делится на n (решите по паскалю).
Ответы
Автор ответа:
0
var
i, n: integer;
begin
readln(n);
for i := 10 to 99 do
if (i mod 10 = n) or (i div 10 = n) or (i mod n = 0) then write(i:4);
end.
i, n: integer;
begin
readln(n);
for i := 10 to 99 do
if (i mod 10 = n) or (i div 10 = n) or (i mod n = 0) then write(i:4);
end.
Автор ответа:
0
Var
i,n: integer;
begin
readln(n);
for i:= 10 to 99 do
if (i mod 10 = n) or (i div 10 = n) or (i mod n = 0) then writeln(i)
end.
i,n: integer;
begin
readln(n);
for i:= 10 to 99 do
if (i mod 10 = n) or (i div 10 = n) or (i mod n = 0) then writeln(i)
end.
Интересные вопросы
Предмет: Қазақ тiлi,
автор: glyubchenko1
Предмет: Математика,
автор: varvarapavlotseva1
Предмет: География,
автор: dinisbikkulov23
Предмет: Алгебра,
автор: МаЛеНьКаЯ28