Задача 3 Урок 10.2
Primary tabs
var a, b, i:integer; begin a := 5; writeln('Угадайте число от 1 до 10 с трех попыток'); for i:=1 to 3 do begin writeln('Попытка №', i, ' выше число:' ); readln(b); if (b = a) then begin writeln('Победа!'); break end else writeln('Не угадали!'); if (i = 3) then writeln('Игра окончена!'); end; readln(); end.
- Log in to post comments
- 815 reads
vedro-compota
Wed, 05/18/2022 - 20:18
Permalink
if (i = 3) then
-- решение должно приниматься после цикла
_____________
матфак вгу и остальная классика =)