Задача 6 урок 9 решение 1

Primary tabs

Submitted by OKside on Fri, 10/08/2021 - 17:43

Forums:

Пользователь вводит три числа, найдите из них максимальное.
Решите тремя способами:

С использованием логической операции and.

program Project961;
var a,b,c: integer;
   begin
   writeln('Vvedite a b c');
   readln(a,b,c);
   if ((a > b) and (a > c)) then  writeln('maximalnoe chislo ',a)
    else if (b>c) then writeln('maximalnoe chislo ',b)
    else writeln('maximalnoe chislo ', c);
     readln();
   end.

Консоль:

Vvedite a b c 
1
2
3
Maksimalnoe chislo 3
  • Log in to post comments
  • 1099 reads
vedro-compota's picture

vedro-compota

Sun, 10/10/2021 - 14:10

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

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

OKside

Wed, 10/13/2021 - 20:22 

program Project961;
var a,b,c: integer;
begin
  writeln('Vvedite a b c');
  readln(a,b,c);
  if ((a > b) and (a > c)) then
    writeln('maximalnoe chislo ',a)
  else
  if (b>c) then
    writeln('maximalnoe chislo ',b)
  else
    writeln('maximalnoe chislo ', c);
  readln();
end.
vedro-compota's picture

vedro-compota

Wed, 10/13/2021 - 20:28

решение засчитано

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