Есть ответ 👍

Распечатать все двузначные числа, заканчивающиеся на 7.(паскаль)

190
203
Посмотреть ответы 2

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


Uses crt; var i: integer; begin clrscr; for i: =17 to 99 do if i mod 10 =7 then writeln(i); end.

Uses crt; var i,k: integer; begin       k: =0;       for i: =1000 to 9999 do           if (i mod 2< > 0) and (i mod 3< > 0) then inc(k);       writeln(k); end.

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