Предмет: Информатика,
автор: sanjarbekdavlatov
Найти максимальное из 4 вводимых значений a, b, c, d? помогите пожалуйста...
Ответы
Автор ответа:
0
var a,b,c,d,max:integer;
begin
writeln('Vvedite chusla');
readln(a,b,c,d);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
if max<d then max:=d;
writeln('max=',max);
end.
begin
writeln('Vvedite chusla');
readln(a,b,c,d);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
if max<d then max:=d;
writeln('max=',max);
end.
Интересные вопросы
Предмет: История,
автор: yelimanova2312
Предмет: География,
автор: abdullayevaafarangiz
Предмет: Информатика,
автор: vlado201025
Предмет: Математика,
автор: chekushinkiril
Предмет: Обществознание,
автор: Lera2003iiiii