Составить программу которая запрашивает число с клавиатуры и выводит на экран квадраты чисел до тех пор, пока с клавиатуры не будет введено число 50

Ответ

Автор - defendercryak

program test;

var a: integer;

begin

a=0;

if a <> 50 then do begin

read (a);

if a=50 then break;

writeln(sqr(a));

end;

end.

По всем вопросам пишите на - vashurokk@rambler.ru

Сайт znanija.net не имеет отношения к другим сайтам и не является официальным сайтом компании.