Предмет: Информатика, автор: valovamarina

Вычислите сумму квадратов всех целых чисел из промежутка от A до B (A<B).

Нужно написать программу в Паскале

Ответы

Автор ответа: PopCop312
0
var a,b,s:integer;
begin
read(a,b);
for a:=a to b do
s+=a*a;
writeln(s);
end.
Автор ответа: valovamarina
0
Спасибо!!!!!!!!!!
Похожие вопросы
Предмет: Алгебра, автор: EdwardTim