Дана программа ее надо изменить так чтобы с ее можно было найти разность максимального и минимального из четырех чисел программа program n_7; var a,b,c,d: integer; function max (x,y; integer): integer; begin if x> y then max: =x else max: =y; end; begin readln (a,b,c,d); f: =max(max(a,b),max(c,d)); writeln ('f='f); end.

267

440

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

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

qwead23p08iwf

Информатика

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

Var a,b,c: real; begin writeln('vvod; '); readln(a,b); a: = 10; b: = 1; b: = a/2*b; a: = 2*a + 3*b; writeln(a); end.

150 000+ пользователей

Оформить подписку