Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Найти максимальное из 4 вводимых значений a, b, c, d? помогите пожалуйста...

Ответ оставил Гость

Var a,b,c,d,max:integer;
begin
writeln(Vvedite chusla);
readln(a,b,c,d);
max:=a;
if maxif maxif maxwriteln(max=,max);
end.

Оцени ответ