Регистрация
natalijasovap08pz3
21.03.2020 21:02
Информатика
Есть ответ 👍

Создание и редактирование диаграмм 30 тесты с ответами
БЫСТРЕЕ

259
491
Посмотреть ответы 1

Ответы на вопрос:

таня2027
таня2027
4,8(41 оценок)

program xxx;

  var a, b, s, i : integer;

begin

  write('введите а-');

  readln (a);

  write('введите b-');

  readln (b);

  s: =0;   for i: = a to b do        s: =s + i * sqr(i);

    writeln ('сумма кубов =', s)

end.

Популярно: Информатика