Урок 9 Задача 2

Primary tabs

Submitted by kuznmax on Sun, 04/10/2022 - 19:42

Forums:

Урок 9 Задача 2

Есть код:

var a, b, c, d : integer;
begin
writeln('vvedite a, b, c, d');
readln(a, b, c, d);
if (a > b) then
if (a > c) then
begin
if (a > d) then
writeln ('Выбираем a');
writeln ('Может выбрали a');
end;
readln();
end.
-- исправьте форматирование.

Решение:

var a, b, c, d : integer;
begin
  writeln('vvedite a, b, c, d');
  readln(a, b, c, d);
  if (a > b) then
    if (a > c) then
begin
  if (a > d) then
    writeln ('Выбираем a');
    writeln ('Может выбрали a');
end;
  readln();
end.
  • Log in to post comments
  • 2131 reads
vedro-compota's picture

vedro-compota

Sun, 04/10/2022 - 20:56

форматирование неверное

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

kuznmax

Mon, 04/11/2022 - 18:53 

var a, b, c, d : integer;
begin
  writeln('vvedite a, b, c, d');
  readln(a, b, c, d);
  if (a > b) then
    if (a > c) then
      begin
        if (a > d) then
          writeln ('Выбираем a');
          writeln ('Может выбрали a');
      end;
  readln();
end.
vedro-compota's picture

vedro-compota

Tue, 04/12/2022 - 20:05

исправить

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

kuznmax

Tue, 04/12/2022 - 20:51 

var a, b, c, d : integer;
begin
  writeln('vvedite a, b, c, d');
  readln(a, b, c, d);
  if (a > b) then
    if (a > c) then
    begin
      if (a > d) then
        writeln ('Выбираем a');
      writeln ('Может выбрали a');
    end;
  readln();
end.

kuznmax

Sun, 04/24/2022 - 15:04 

var a, b, c, d : integer;
begin
  writeln('vvedite a, b, c, d');
  readln(a, b, c, d);
  if (a > b) then
    if (a > c) then
      begin
      if (a > d) then
        writeln ('Выбираем a');
        writeln ('Может выбрали a');
      end;
  readln();
end.