Регистрация Вход
Информатика 10 - 11 классы Бутримов
Решено

КТО-НИБУДЬ HELP.ЕСТЬ ТАКИЕ КТО СПОСОБЕН???!!!.....(блок схему в программу pascal пожааалуйста (номер 2)

Var a,b,c,d:integer; begin readln(a,b,c); if alt;c then d:=a; if blt;c then a:=b; d:=d+a; write(d); end.
80
ОТВЕТЫ
Var a,b,c,d:integer;
begin
readln(a,b,c);
if alt;c then d:=a;
if blt;c then a:=b;
d:=d+a;
write(d);
end.
75
Отв. дан
Для написания вопросов и ответов необходимо зарегистрироваться на сайте