Var a,b,c,d,max:integer; begin read(a); max:=a; read(b); if b>max then max:=b; read(c); if c>max then max:=c; read(d); if d>max then max:=d; writeln(max); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
