Написать программу в паскале. на вход подаётся x на выход y=5*x если x 0 y=x*x иначе

Question

Информатика: Написать программу в паскале. на вход подаётся x на выход y=5*x если x 0 y=x*x иначе

katya8998 · Answer

//Pascal ABC.NET 3.1 сборка 1256Var x,y:real;beginreadln(x);if x 0 then y:=5*x else y:=x*x;writeln(y);end.Пример ввода:-1.1Пример вывода:1.21...

Написать программу в паскале. на вход подаётся x на выход y=5x если x> 0 y=xx иначе