• Вопрос по информатике:

    Написать программу ввода неопределенного ряда целых чисел до тех пор,пока не будет введена 1. После ввода 1,программа должна вывести сообщение «программа закончена»

    • Автор:

      elliott

  • program raf105;

    var a:integer;

    begin

    while a<>1 do

    readln(a);

    writeln('Программа закончена');

    end.

    Язык программирования PascalABC

    • Отвечал:

      nakitawinters
    • 0

    Ответов нет, но ты это испарвиш!

Еще 4 ненужных тебе вопроса, но это важно для поиска