Ответы
Ответ дал:
2
var a,b:real;
begin
a:=1;
b:=0;
repeat
writeln('Квадрат числа ',a,' = ',sqr(a),' Куб числа ',a,' = ',power(a,3));
a:=a+1+b;
b:=b+1;
until b>9
end.
begin
a:=1;
b:=0;
repeat
writeln('Квадрат числа ',a,' = ',sqr(a),' Куб числа ',a,' = ',power(a,3));
a:=a+1+b;
b:=b+1;
until b>9
end.
Вас заинтересует
1 год назад
2 года назад
7 лет назад
7 лет назад
8 лет назад