Modidar
5 год назад
Ребята, очень нужна понятная и доступная помощь в Pascal, посмотрите на баллы.Написать программу: вычислить значение переменной у по одной из двух ветвлений. (данные прикреплены). Надеюсь на вашу помощь, желательно на листке написать и тоже прикрепить, но можно и без.
ОТВЕТЫ
Марийка
Oct 24, 2020
program ClarisVerbis;
var
x,y:real;
begin
Write('x='); Read(x);
if x>0 then y:=x*x
else y:=x+2;
Writeln('y=',y)
end.
var
x,y:real;
begin
Write('x='); Read(x);
if x>0 then y:=x*x
else y:=x+2;
Writeln('y=',y)
end.
150
Смежные вопросы:
