• Разработайте и запишите программу нахождения минимума из трёх вводимых целых чисел a,b,c.Проверьте полученную программу на следущих тестах (1,2,3);(3,2,1);(1,3,2).

Ответы 2

  • vara,b,c:integer;beginwriteln('Введите 3 числа');readln(a,b,c);if (a<b) and (a<c) then writeln('',a);if (c<b) and (c<a) then writeln('',c);if (b<a) and (b<c) then writeln('',b);end.
    • Автор:

      annelang
    • 6 лет назад
    • 0
  • var a,b,c : integer;begin  read(a,b,c);//вводим 3 числа  if (a < b) and (a < c) then writeln(a)  else if (b < a) and (b < c) then writeln(b)  else writeln(c);end.
    • Автор:

      clayton
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years