Задача 2 Урок 10.2
Primary tabs
В примере №2 есть код, который описывает программу угадывания числа с трех попыток. Перепишите этот код так, чтобы:
Можно было бы задать угадываемое число (пусть его вводит пользователь)
Если пользователь все же угадал число - напишите в сообщении о победе с какой именно попытки ему это удалось.
program g10y2z2; var a, b, i:integer; begin writeln ('vvedite chislo ot 1 do 10 '); readln(a); writeln('ugadaite chislo ot 1 do 10 s trioh popitok'); for i:=1 to 3 do begin writeln('Popitka №', i, ' vashe chislo:' ); readln(b); if (b = a) then begin writeln('Pobeda s popitki №', i); break end else writeln('Ne ugadali!'); end; writeln('igra okonchena!'); readln(); end.
- Log in to post comments
- 519 reads
vedro-compota
Wed, 09/14/2022 - 20:09
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)