Найти сумму положительных чисел из 10, введённых с клавиатуры. Программа Паскаль. - вопрос №1449962

Ответы

var
i, x, sum:integer;

begin
  sum:=0;
  for i:=1 to 10 do
  begin
    readln(x);
    sum:=sum+x;
  end;
  writeln(sum);
end.
29.04.15

Еva

от 100 p.
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store