Напечатать сумму кубов чисел -10,-8,-6,-4,-2.PASCAL?
Напечатать сумму кубов чисел -10,-8,-6,-4,-2.PASCAL?
Ответ(ы) на вопрос:
Гость
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 Возводит в куб
Не нашли ответ?
Похожие вопросы