С клавиатуры вводятся положительные числа до тех пор пока не будет введено отрицательное число. Составить программу, выводящую это число на экран.

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