Составьте программу вычисления произведения квадратов чисел от 4 до 9. в паскале, цикл repeat.

Suhih77 Suhih77    1   02.09.2019 18:40    0

Ответы
Mashka063 Mashka063  06.10.2020 13:00
Var
   A:integer;
   P:real;
Begin
P:=1;
A:=4;
Repeat
P:=P*A*A;
A:=A+1
Until A > 9;
WriteLn('P = ',P);
ReadLn
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика