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

Question

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

Answer 1

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

Comments

ну всё переписывать что вы написали?

---

Да

---

ок?

---

СПАСИБО

---

только после каждой точки с запятой на новую строчу переходи

---

ну я знаю

---

это 8 класс

---

ия в 8 классе

---

я болел и не прошел эти темы

---

Спасибо