Program igra;var a,b,c:integer;beginwriteln('Правда или действие? Если выбираете правду, введите 1, если действие 2');read(a);if a=1 then writeln('Сколько тебе лет?')else writeln('Подтянись 5 раз');writeln('Правда или действие? Если выбираете правду, введите 1, если действие 2');read(a);if a=1 then writeln('Сколько стоит твой компьютер?')else writeln('Пробеги вокруг техникума 5 раз');writeln('Правда или действие? Если выбираете правду, введите 1, если действие 2');read(a);if a=1 then writeln('Какой человек самый неприятный для тебя?')else writeln('Не садись целый час');end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку