Найти сумму 1² + 2² + 3² +10². операцию возведения в степень не использовать.паскаль

Kniga4001 Kniga4001    3   05.06.2019 09:30    0

Ответы
Vixsik Vixsik  05.07.2020 22:18
var
  a, b: integer;  

begin
  for a := 1 to 10 do
    b += a * a;
  writeln(b);
end.
ПОКАЗАТЬ ОТВЕТЫ
veronika13571 veronika13571  05.07.2020 22:18
Var  x,s: integer;  
begin
  for x := 1 to 10 do
    s:= s+x*x;
writeln('Сумма равна ',s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика