[_M_]

Здравствуйте, помогите пожалуйста с паскалем..
Изучал в основном пыху, но для сдачи экзаменов (егэ);
Требуется паскаль.
При составлении программы у меня возникли некоторые сложности..
Задача:
Нужно вывести максимальное и минимальное значение 4 переменных...

Вот то что я уже додумал:

Код:

Program spaBnenie;

var a,b,c,d,e,f:integer;
begin
write('a=');
readln(a);
write('b=');
readln(b);
write('c=');
readln(c);
write('d=');
readln(d);

if a<b then e:=b else e:=a;
if c>d then e:=c else e:=d;
if a<b then f:=a else f:=b;
if c<f then f:=c;

writeln ('max=',d);
writeln (' u min=',f);
readln
end.

Может я это уже и часть сделал, но меня что то замкнуло, и я не могу скомпоновать свои дальнейшие действия =(


Удалите пожалуйста тему, Выше уже есть такая.. просто форум мне выдал ошибку... И я нажал еще раз создать

[WebAction]

Гляньте тут http://pas1.ru/maxifelse