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

Primary tabs

Submitted by Dennis80 on Wed, 05/04/2022 - 09:36

Forums:

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

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

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
        if (b <> a) then
          writeln('Игра окончена!');
          break;
    end;
  readln();
end.
  • Log in to post comments
  • 3035 reads
vedro-compota's picture

vedro-compota

Wed, 05/04/2022 - 20:33

а как же три попытки?

_____________
матфак вгу и остальная классика =)

Dennis80

Thu, 05/05/2022 - 11:24 

var a, b, i : integer;

begin
  a := 5;
  writeln('Угадайте число от 1 до 10 с трех попыток');
  for i:=1 to 3 do
    begin
      write('Попытка №', i, ' ваше число: ');
      readln(b);
      if (b = a) then
        begin
          writeln('Победа!');
          break;
        end
      else
        writeln('Не угадали!');
      if (i = 3) then
        writeln('Игра окончена!');
    end;
  readln();
end.
vedro-compota's picture

vedro-compota

Wed, 05/11/2022 - 19:38

if (i = 3) then
writeln('Игра окончена!');

-- 1) Проверку и вывод сообщения лучше делать за пределами цикла -- после его выполнения
2) Просто вынести за цикл не получится - проверьте условие

_____________
матфак вгу и остальная классика =)

Dennis80

Tue, 05/17/2022 - 18:30 

var a, b, i : integer;

begin
  a := 5;
  writeln('Угадайте число от 1 до 10 с трех попыток');
  for i:=1 to 3 do
    begin
      write('Попытка №', i, ' ваше число: ');
      readln(b);
      if (b = a) then
        begin
          writeln('Победа!');
          break;
        end
      else
        writeln('Не угадали!');
    end;
  if (i = 3) then
    writeln('Игра окончена!');
  readln();
end.
vedro-compota's picture

vedro-compota

Wed, 05/18/2022 - 20:03

засчитано

_____________
матфак вгу и остальная классика =)