нужно решить хотябы 1 упр очень срочно нужно

+ 0 -

MARZIPASHA

02 февр. 2015 г., 6:53:27 (9 лет назад)

program aliona;
var a,b,min,max:integer;
begin
writeln('vvedite a,b');
readln(a,b);
iif a>b then 
begin
a:=max;
b:=min;end;
if b>a then 
begin
a:=min;
b:=max;end;
writeln('max=',max,'min=',min);
readln;
end.
как то так но я не уверена

+ 0 -

Katя6

02 февр. 2015 г., 9:48:49 (9 лет назад)

Комментарий удален

+ 0 -

Nirvana0001

02 февр. 2015 г., 10:42:19 (9 лет назад)

спасибо за решение!!!)

+ 0 -

Олег657

02 февр. 2015 г., 11:25:46 (9 лет назад)

Комментарий удален

+ 0 -

0225032089081888199

02 февр. 2015 г., 12:48:13 (9 лет назад)

да не за что)

+ 0 -

Maksimka953

02 февр. 2015 г., 14:40:27 (9 лет назад)

Комментарий удален