Гектор
4 год назад
Пожалуйста посчитайте пожалуйста .Нужно решить работы № 55-57Лучший ответ получит 50 поинтов .
ОТВЕТЫ
Сафия
Oct 24, 2020
55.)
var
s, i: integer;
begin
for i := 1 to 10 do
s := s + sqr(i);
writeln(s)
end.
56.)
Не видно.
57.)
var
s, i: integer;
begin
for i := 1 to 7 do
s := s + i*i*i;
writeln(s)
end.
var
s, i: integer;
begin
for i := 1 to 10 do
s := s + sqr(i);
writeln(s)
end.
56.)
Не видно.
57.)
var
s, i: integer;
begin
for i := 1 to 7 do
s := s + i*i*i;
writeln(s)
end.
387
Смежные вопросы:
