С клавиатуры вводятся положительные числа до тех пор пока не будет введено отрицательное число. Составить программу, выводящую это число на экран.
С клавиатуры вводятся положительные числа до тех пор пока не будет введено отрицательное число. Составить программу, выводящую это число на экран.
Ответ(ы) на вопрос:
var a:integer; begin read(a); while(a>0) do readln(a); wrileln(a) end.
Не нашли ответ?
Похожие вопросы