Вывести квадраты натуральных чисел в диапазоне от [a,b]
на языке pascal.
240
317
Ответы на вопрос:
program prog;
var a,b:integer;
begin
write('Введите a: '); readln(a);
write('Введите b: '); readln(b);
while a <= b do
begin
write(sqr(a), ' ');
a:=a+1
end
end.
1)включение таблиц в текстовый документ
2)работа со списками
3)включение в текстовый документ графических объектов и формкл
Популярно: Информатика
-
Вано11111111111112.05.2023 01:10
-
ainura832604.11.2021 02:29
-
frankinshtein22807.05.2021 20:16
-
MiraukiTokugava01.03.2020 16:27
-
vitaming19.03.2020 03:30
-
Kriiisskriiiis04.02.2021 13:49
-
vyachik200023.09.2021 14:04
-
ПомидоркаЛ14.11.2020 04:55
-
Ануар2220.01.2023 07:03
-
AkaNika23.07.2022 05:22