Сn-целое число, нужно вывести квадрат всех чисел о 1 до n. в паскале abc. решить через for
224
430
Ответы на вопрос:
Var n,b: integer; begin wtriteln('введите целое число n'); readln(a); for b: =1 to n do begin writeln('квадрат ',b,' = ',b*b); end; end.
Популярно: Информатика
-
Piloti3p6i10.01.2021 10:44
-
Ddf00102.05.2021 19:15
-
Zara221717.11.2021 13:32
-
Danfdffefd22.01.2022 06:36
-
annmslna204401.02.2021 02:43
-
SashaUshanka21.06.2022 10:30
-
Эплик119.10.2021 03:51
-
адрдрюе07.12.2021 06:32
-
Rustem111208.10.2021 11:34
-
Food798342712.05.2020 03:13