Есть ответ 👍

Напишите функцию которая вычисляет максимальное из трех чисел visual basic

274
330
Посмотреть ответы 2

Ответы на вопрос:

deemetraa
4,4(74 оценок)

var a, b, c: integer;

function naib(af, bf, cf: integer): integer;

var max: integer;

begin  

if af > bf then max := af else max := bf;

if cf > max then max := cf;

naib := max;

end;

begin

writeln('Введите a');

readln(a);

writeln('Введите b');

readln(b);

writeln('Введите c');

readln(c);

writeln('Наибольшим из введённых трёх чисел является ', naib(a, b, c));

end.

Объяснение:

Vikos009
4,4(92 оценок)

Объяснение:

для моторов ( прости если не правильно )

Популярно: Информатика