Составить программу в pascal вводишь два числа а и б. при чем а < б. надо вывести квадраты всех чисел между а и б

Rdamir2008 Rdamir2008    2   27.08.2019 06:00    0

Ответы
Мигает333 Мигает333  26.08.2020 10:49
Var a,b:integer;
begin
write('Введите a ');
readln(a);
write('Введите b ');
readln(b);
inc(a);
while a<>b do begin
writeln(a*a);
inc(a);
end
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика