Задание 4 Параграф 22 ГДЗ Семакин 8 класс (Информатика)

Составьте не менее трёх вариантов программы определения наименьшего из трёх данных чисел.

Ниже приведены три варианта программы на Паскале для нахождения наименьшего из трёх чисел.

program task_1;
var
  a, b, c, min: integer;
begin
  writeln(‘Введи три числа через пробел’);
  readln(a, b, c);
  min := a;
  if b < min then min := b;
  if c < min then min := c;
  writeln(‘min=’, min)
end.

program task_2;
var
  a, b, c, min: integer;
begin
  writeln(‘Введи три числа через пробел’);
  readln(a, b, c);
  if b < a then min := b else min := a;
  if c < min then min := c;
  writeln(‘min=’, min)
end.

program task_3;
var
  a, b, c, min: integer;
begin
  writeln(‘Введи три числа через пробел’);
  readln(a, b, c);
  if (b < a) and (b < c) then min := b
  else if (a < b) and (a < c) then min := a
  else min := c;
  writeln(‘min=’, min)
end.

Ответ

Составлены три варианта программы определения наименьшего из трёх данных чисел.