Склавиатуры вводят последовательность чисел до тех пор пока не будет введено число 3. требуется найти сумму введенных чисел.(паскаль) !

david2005317 david2005317    2   26.07.2019 11:40    0

Ответы
l3bv1t l3bv1t  03.10.2020 13:29
Var
  s, n: real;

begin
  s := 0;
  n := 0;
  repeat
    s := s + n;
    readln(n);
  until n = 3;
  writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика