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

Вопрос на 50 балов. Напечатайте программу на языке Turbo Pascal,заранее спасибо

  1. Ответ
    Ответ дан PuerDeSatan
    var 
    f, x: Real;
    begin 
    write('X = '); 
    Readln(x); 
    if Abs(x) <= 1 then f:=Abs(x) 
    else if Abs(x) <= 2 then f:=Sqr(x) 
    else f:=4; 
    Writeln('F(x) = ', f:4:2); 
    Readln;
    end.
Самые новые вопросы
Носкова Анастасия
Другие предметы - 4 года назад

Сочинение-рассуждение. прочитайте текст. есть у меня внучка. однажды она говорит: — у веры в субботу день рождения. она

Наумова Надя
Другие предметы - 4 года назад

Л.н. толстой. как боролся русский богатырь как сказал иван о своей силе? найдите ответ в тексте. запишите.

Сазонова Анастасия
История - 4 года назад

Кто такой мильтиад и какова его роль в победе над персами?

Тетерина Татьяна
История - 4 года назад

Какие примеры н. м. карамзин использует для разъяснения пользы новой системы престолонаследия? согласны ли вы с позицией

Попова Полина
География - 4 года назад

Дополните схему. она поможет вам лучше усвоить содержание §1.: 1 что изучает география 2 с помощью чего 3 зачем изучают

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.