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

297

305

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

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

mariyshak57

Информатика

4,5(61 оценок)

Function max(a,b : integer) : integer; begin if a> =b then max: =a else max: =b; end; function max3(a,b,c : integer) : integer; begin max3: =max(max(a,b),c); end;

Дари233

Информатика

4,6(55 оценок)

//прога на языке паскаль: var a, sum: double; begin write ('введите первоначальную стоимость газеты: '); readln (a); sum: =a*50+(1.2*a*150); write ('заработок продавца: ', sum); end.