Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
файл с исходным текстом программы на паскале должен иметь расширение pas.
var i: integer; s: real;
begin s : = 0; for i : = 1 to 100 do s : = s + i * i; writeln(s: 7: 0); end.
1280*800*24/19800 секунд
var x,y: real;
begin
read(x);
if x< =10 then y: = 210
else y: = x*x*x;
writeln(y);
end.
Популярные вопросы