Урок 10.2 задача 2
Primary tabs
В примере №2 есть код, который описывает программу угадывания числа с трех попыток. Перепишите этот код так, чтобы:
Можно было бы задать угадываемое число (пусть его вводит пользователь)
Если пользователь все же угадал число - напишите в сообщении о победе с какой именно попытки ему это удалось.
var a, b, i:integer; begin writeln('Введите число от 1 до 10'); readln(a); writeln('Угадайте число от 1 до 10 с трех попыток'); for i:=1 to 3 do begin writeln('Попытка №', i, ' выше число:' ); readln(b); if (b = a) then begin writeln('Победа!'); break end else writeln('Не угадали!'); end; writeln('Игра окончена!'); readln(); end.
- Log in to post comments
- 1431 reads
vedro-compota
Sat, 03/19/2022 - 11:19
Permalink
добавить вывод номера попытки
добавить вывод номера попытки для победы
_____________
матфак вгу и остальная классика =)
kuznmax
Mon, 04/25/2022 - 17:20
Permalink
Исправил
vedro-compota
Tue, 04/26/2022 - 20:03
Permalink
проверить запуск
проверить запуск, сейчас вообще не работает
_____________
матфак вгу и остальная классика =)