profile
Опубликовано 6 лет назад по предмету Информатика от gordienkonikita2002

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

  1. Ответ
    Ответ дан 21thewitcher21p0g54h

    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);

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

Самые новые вопросы