Варфоломей
5 год назад
Решить в Pascal ABC. Пожалуйста, Пожалуйста посчитайте)
ОТВЕТЫ
Walters Donald
Oct 24, 2020
program n1;
var x,y: real;
begin
read(x);
if x>=3 then y:=x*x+5 else y:=x-8;
writeln ("y=",y)
end.
var x,y: real;
begin
read(x);
if x>=3 then y:=x*x+5 else y:=x-8;
writeln ("y=",y)
end.
123
Смежные вопросы:
