НАЙТИ СУММУ
1² + 2² + 3² ...+10². Операцию возведения в степень не использовать.Паскаль
Ответы на вопрос
Ответил HRAshton
0
var
a, b: integer;
begin
for a := 1 to 10 do
b += a * a;
writeln(b);
end.
a, b: integer;
begin
for a := 1 to 10 do
b += a * a;
writeln(b);
end.
Ответил HRAshton
0
Это перешло в Паскаль с его адаптацией под .NET, позволяет сразу приварить к переменной некоторое значение... Аналогично
+=
-=
*=
/=
+=
-=
*=
/=
Ответил Аноним
0
var x,s: integer;
begin
for x := 1 to 10 do
s:= s+x*x;
writeln('Сумма равна ',s);
end.
begin
for x := 1 to 10 do
s:= s+x*x;
writeln('Сумма равна ',s);
end.
Ответил margorita201
0
а не надо добавлять после begin что s:=0;
Ответил margorita201
0
да? спасибо
Ответил Аноним
0
Да, точно)) Можешь добавить в новой версии, хуже не будет. Результат работы одинаков будет.
Новые вопросы
Химия,
2 года назад
Математика,
2 года назад
Алгебра,
10 лет назад
Математика,
10 лет назад
Биология,
10 лет назад
Алгебра,
10 лет назад