profile
Опубликовано 5 лет назад по предмету Информатика от Ball00n

Выручайте(ПАСКАЛЬ, не сложно вродь).
Задание на фото. буду очень благодарен.

  1. Ответ
    Ответ дан Опечатка
    uses crt;
    var c:char;i:byte;
    begin
    write('Программа проверки знания истории архитектуры.Начать тест?y/n');
    read(c);
    clrscr;
    if c='y' then
    begin 
    clrscr;
    writeln('Невский проспект получил своё название:');
    writeln('1.По имени реки, на берегах которой расположен Санкт-Петербург.');
    writeln('2.По имени близко расположенного монастыря Александро-Невской лавры');
    writeln('3.В память о знаменитом полководце Александре Невском.');
    writeln('Введите номер правильного ответа и нажмите <Enter>');
    read(i);
    clrscr;
    if i=2 then writeln('SUCCES!')
    else writeln('Вы ошиблись. Правильный ответ: 2.');
    end;
    end.
    1. Ответ
      Ответ дан Аккаунт удален
      как ты посмел удалить
    2. Ответ
      Ответ дан Опечатка
      там не было решения, так что не возмущайся
Самые новые вопросы