Напишите программу нахождения наименьшего значения среди трех величин: А,В,С.9 класс /...

+167 голосов
3.2m просмотров

Напишите программу нахождения наименьшего значения среди трех величин: А,В,С.9 класс / Pascal ​


Информатика | 3.2m просмотров
Дан 1 ответ
+84 голосов

Ответ:

  • var a, b, c, min: integer;
  • begin
  • read(a, b, c);
  • if a < b then
  • if a < c then min := a
  • else min := c  
  • else min := b;
  • write('Мин: ', min);
  • end.

или так:

  • begin
  • ReadArrInteger(3).Min.Print
  • end.

Пример работы:


image
image
(3.7k баллов)