Среди двузначных чисел найти те,которые кратны 13. как это сделать в паскале ? ?
129
230
Ответы на вопрос:
program ; var n : integer; begin for n: = 10 to 99 do if n mod 13 = 0 then writeln(n); readln; end.
program mdd; uses crt; var i: longint; beginclrscr; for i: = 10 to 99 dobeginif i mod 13 = 0 then writeln(i); end; readkey; end.
Популярно: Информатика
-
DANA307200531.01.2021 20:56
-
ТвойЩенок25.10.2022 21:11
-
vikavika141715.09.2022 02:16
-
alinavasileva2221.03.2021 18:36
-
vladrifeyt112.08.2022 15:49
-
alexvelova10.12.2022 14:15
-
ivankal05.11.2021 23:09
-
punchplz28.06.2021 17:51
-
gebatible77709.06.2020 12:59
-
нтпрои04.02.2023 13:05