Ответы на вопрос:
Ну, например, так: uses crt; const n=100; var i: integer; begin clrscr; writeln (' tabliza kwadratow: '); for i: =1 to n do begin write (i,'=',i*i, ' ': 4); if (i mod 5=0) then writeln; end; writeln; readln; end.
Популярно: Информатика
-
chiastr20.01.2020 19:24
-
gffgfytdtdety19.03.2020 10:23
-
DariyaKnyazeva17.11.2022 15:08
-
shansosia05sofisofi05.03.2023 07:03
-
krusher7715.05.2023 17:02
-
OшUb0чkA28.03.2021 17:12
-
сел518.09.2020 06:22
-
nurikparik17.04.2023 14:23
-
dmmkuplinov28.10.2020 23:34
-
abeloglazova89120.02.2021 07:43