Предмет: Информатика,
автор: vika111192
Проверить и в случае ошибки исправить программу вычисления функции на языке PASKAL
Приложения:


Ответы
Автор ответа:
0
uses crt;
var
x, y : real;
begin
writeln('Введите х');
read(x);
if x<=4 then
y:=x*x*x-2
else if x>=6 then
y:=40-x
else
y:=x*x;
writeln('y= ',y);
end.
Приложения:

vika111192:
а не посмотрите еще? https://znanija.com/task/31370174 и https://znanija.com/task/31370213 + блок схемы
Похожие вопросы
Предмет: Литература,
автор: lada0522
Предмет: Английский язык,
автор: bkoktys
Предмет: Музыка,
автор: vdrrekkkop
Предмет: Математика,
автор: Veronikanikitina
Предмет: Математика,
автор: shmelbond