Предмет: Информатика, автор: Ball00n

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

Приложения:

Ответы

Автор ответа: Опечатка
0
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.
Автор ответа: Аноним
0
как ты посмел удалить
Автор ответа: Опечатка
0
там не было решения, так что не возмущайся
Похожие вопросы