Abc pascal подскажите где у меня ошибка
Var x, y, m:real;
begin
Write ('введите x=');
Readln (x);
Write ('введите y');
Readln (y);
if x> y then m:=x else m:=y;
Writeln ('m=',m);
End.
По дате
По рейтингу
Для единства стиля следовало бы поставить "=" после "введите y".
А так всё правильно. Если это нахождение максимального из двух чисел, конечно.
всё правильно
Видео по теме