Напечатать сумму кубов чисел -10,-8,-6,-4,-2.pascal?

ЯрославаВячеславовна ЯрославаВячеславовна    1   18.08.2019 12:50    0

Ответы
dashatieriesanp06obv dashatieriesanp06obv  09.08.2020 14:56
Var sum,num,i:integer;beginwriteln('Введите числа');for i:=1 to 5 do begin readln(num); sum:= sum + sqr(num) * num; end;writeln(sum);end.

P.S sqr(num)*num Возводит в куб
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика