Срочнооо помогите!!! Отдам 80 баллов!!!

Срочнооо помогите!!! Отдам 80 баллов!!!

Задать свой вопрос
Алиса Карничева
Вот фото
Эмилия
нет
1 ответ

Ответ:

Паскаль:

Function k(y:integer,m:integer):integer

Begin

If mlt;8 then

K:= 5*y+2

Else

If mgt;15 then k:=7-3*y

Else k:=10-y*y;

End;

Function a(x:integer,y:integer):integer

Begin

If(8*y+sqrt(y)) then

A:=x+4

Else a:= x;

End;

Begin

Read (x,y,m);

Write(a(x,y)+k(y,m))

End.

Разъясненье:

Василиса Григолия
Это точно верно?
Vjacheslav
Заключительный вопрос, почему написал в конце изъяснение и двоеточие и всё
Есения Алтынцева
А в конце же А и К надо сложить, чтоб отыскать Е. Тип получится 3 программы
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт