Регистрация
Undina705
12.05.2022 17:46
Информатика
Есть ответ 👍

Найти все числа, которые делятся на n среди: а)всех двузначных чисел; б)всех трёхзначных чисел.

142
274
Посмотреть ответы 2

Ответы на вопрос:

LonFostYT
LonFostYT
4,5(100 оценок)
Var i,n: longint; begin readln(n); for i: =10 to 99 do   if i mod n=0 then writeln(i); end. во втором случае цикл начинаем со 100 и до 999
цветок82
цветок82
4,4(87 оценок)
Program stach; var i,s: real; begin i: =1; while i< =20 do begin s: =s+((i+5)/i); i: =i+0.4; end; writeln('s=',s); end.

Популярно: Информатика