Pascal
составить программу с полным ветвлением
y=x*x если x<2
y=x*x*x если x>2
y=2+x если x=2

2 Ноя 2019 в 19:48
200 +1
0
Ответы
1

var x,y: real;

begin

readln(x);

if x<2 then y:=x*x

else if x>2 then y:=x*x*x else y:=2+x;

writeln(y:4:2);

end.

3 Ноя 2019 в 19:35
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир