Вычислите сумму квадратов всех целых чисел из промежутка от A до B (A меньше B). Нужно написать программу в Паскале
Вычислите сумму квадратов всех целых чисел из промежутка от A до B (A
Гость
Гость
Ответ(ы) на вопрос:
Гостьvar a,b,s:integer;
begin
read(a,b);
for a:=a to b do
s+=a*a;
writeln(s);
end.
Не нашли ответ?
Похожие вопросы