Предмет: Информатика, автор: gordienkonikita2002

Решите пожалуйста две задачи на Pascal.

Приложения:

Ответы

Автор ответа: 21thewitcher21p0g54h
1

1)

var x,z:real;

begin

   read(x);

if x<7 then z:=7-x

else if x>9 then z:=x-9

else z:=x*x-40;

write(z:0:3);

Если х - число вещественное.

Похожие вопросы
Предмет: Математика, автор: НочкаДжи64