• Предмет: Информатика
  • Автор: pro100nika201
  • Вопрос задан 8 лет назад

Где ошибка??

Задание: Написать на Паскале программу, которая запрашивает с клавиатуры N произвольных целых чисел и ищет их сумму. Число N вводится с клавиатуры. Разработать для созданной программы не менее трёх тестов и проверить на них правильность работы алгоритма.
Я написала так:
uses crt;
var n,i,s,c:integer;
begin
clrscr;
readln(n);
s:=0;
for i:=1 to n do
begin
readln(c);
s:=s+c;
end;
writeln(s);
readkey;
end.
Где здесь допущена ошибка? Помогите!

Ответы

Ответ дал: alca132
0
Может задачу недопонял. Но вот что вышло:

uses crt;
var n,i,s:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
begin
s:=s+i;
end;
writeln(s);
readkey;
end.
Ответ дал: alca132
0
У тебя все правильно написано. Сразу вводишь N сколько будет произвольных чисел.
Ответ дал: alca132
0
А потом вводишь сами произвольные числа
Ответ дал: alca132
0
А дальше все эти числа суммируются
Ответ дал: pro100nika201
0
вместо буквы N я должна ввести количество произвольных чисел?
Ответ дал: pro100nika201
0
вместо N ввести число?
Вас заинтересует