Предмет: Информатика,
автор: Аноним
Задание Паскаль .Вывести квадраты всех чисел от a до b. ( Значения а и b вводятся с клавиатуры; b>=a).Для выполнения организовать цикл с предусловием.
Ответы
Автор ответа:
0
var
a, b: integer;
begin
readln(a, b);
while a <= b do
begin
write(sqr(a), ' ');
a += 1;
end;
end.
Интересные вопросы
Предмет: Английский язык,
автор: muzayyanasirojiddino
Предмет: Алгебра,
автор: watafaka777
Предмет: Русский язык,
автор: rabievabdusamad
Предмет: Литература,
автор: marinapolyackov