Написать на паскале программу, которая запрашивает с клавиатуры n произвольных целых чисел и ищет их сумму. число n вводится с клавиатуры. разработать для созданной программы не менее трёх тестов и проверить на них правильность работы алгоритма. !

127

348

Посмотреть ответы 2

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

увливуют

Информатика

4,4(74 оценок)

Var n,i,s,c: integer; begin readln(n); for i: =1 to n do //сколько произвольных чисел будет. begin readln(c); //вводим произвольные числа s: =s+c; //суммируем end; writeln(s); //вывод суммы end.