Регистрация
serg197200
06.04.2021 09:38
Информатика
Есть ответ 👍

Суммативная работа за раздел: разработки презентация проекта

189
242
Посмотреть ответы 1

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

00001Wolf
00001Wolf
4,4(66 оценок)
Var   a: integer; function f(a: integer): integer; var   s, i: integer; begin   s : = 0;     for i : = 1 to a do       s : = s + i;     f : = s; end; begin   readln(a);   writeln(f(a)); end.

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