Задача 3 Урок 10.2

Задача 3 Урок 10.2:

В примере №2 есть код, перепишите его таким образом, чтобы сообщение "Игра окончена" выводилась, только если пользователь не угадал загаданное число.
Подсказка: используйте значение логического типа.

var a, b, i, c:integer;
begin
  writeln('vvedite chislo');
  readln(a);
  c:=0;
  writeln('Ygadayte chiclo ot 1 do 10 c 3-x popitok');
  for i:=1 to 3 do
  begin
    writeln('Popitka #', i, ' visje chislo:' );
    readln(b);
    if (b = a) then
    begin
       writeln('Pobeda! C ',i,' popitki');
       break
    end
    else
       writeln('He ygadali!');
  end;
  if (a<>b) then
  writeln('Game over!');
  readln();
end.