Помогите задача паскаль : )

Question

написать программу, которая находит суму кубов всех 2х значных чисел кратных 5...

все числа кратных 5 я нашел осталось их в куб вознести и найти суму ) Помогите задача паскаль : )

ПРАВИЛЬНО????

Мария · Accepted Answer

sum := sum + i*i*i - не?

Константин Жевнеров · Answer

Вы же можете самостоятельно дописать программу. Лениво?

Вiолетта Гущенко · Answer

then inc(s,i*i*i); - вот и всё)

Дмитрий Каминский · Answer

Зачем тебе переменная d и crt подключать? 
var 
 summ: longint; 
 i:integer; 
begin 
 i:=10; 
 summ:=0; 
 while (i<=95) do 
 begin 
 summ:=summ+(i*i*i); 
 i:=i+5; 
 end; 
 writeln(summ); 
end.

Дмитрий · Answer

Так в одной строке сразу и найдешь 
ты ужезнаешь какие числа кратны 5 
Пишешь 
SUMM:=0; 
Пишешь 
For все числа do begin 
IF X число двузначное и делится на пять do begin 
И вот собственно подсчет суммы. 
SUMM:=SUMM+ X*X*X: Это и будет КУБ числа - три раза умножить 
end;if} 
end;{for) 
Если что - пиши. На фото ничего не видно.