Question

Написать программу в Паскале.Задание под буквой Б

Answer 1

uses crt;
var x: real;
begin
clrscr;
readln(x);
if x<=0 then writeln ('Y =',3*x) else
if x >=3.5 then writeln ('Y=4') else
writeln('Y=', 2-(x*x));
end.

Answer 2

тогда верно, проверяй

Answer 3

ну значит так должно быть два IF?

Answer 4

da, kak ya i napisal