Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
ответ:0,2097152 Гб
Объяснение:
var
x,y: real;
begin
x: =-1;
while x< =1 do
y: =x*x*x;
writeln(y);
x: =x+0.1;
end;
end.
грубо и сердито:
var c: longint;
read(c);
c: =c mod 10;
c: =sqr(c);
writeln(c);
Популярные вопросы