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

Question

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

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

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 Возводит в куб