М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Angelina07111
Angelina07111
13.01.2020 22:24 •  Информатика

Надо, составьте программу на паскале для вычисления значений у по формуле у=корень из х для х,заданного с клавиатуры.если х число отрицательное, то выведите сообщение, что значение у не существует.

👇
Ответ:
арина1495
арина1495
13.01.2020

var

y,x:real;

begin

write ('X = ');readln(x);

if x<0 then writeln ('Y does not exist') else begin

y:=sqrt(x);

writeln ('Y = ',y:0:4);

end;

readln;

end.

4,7(94 оценок)
Открыть все ответы
Ответ:
12575
12575
13.01.2020

Информационная безопасность – это защищенность информации и поддерживающей инфраструктуры от случайных или преднамеренных воздействий естественного или искусственного характера, чреватых нанесением ущерба владельцам или пользователям информации, а также прав и интересов человека и гражданина, общества и государства в информационной сфере от реальных и потенциальных угроз, при котором обеспечивается устойчивое развитие и информационная независимость. Под обеспечением информационной безопасности или защитой информации понимается сохранение ее конфиденциальности, целостности и доступности. Информационная безопасность достигается посредством реализации соответствующего набора мер контроля, включая политики, процедуры, процессы, организационные структуры и функции программного и аппаратного обеспечения. Политика информационной безопасности (далее — Политика) – комплекс превентивных мер по защите информации, в том числе информации с ограниченным распространением (служебная информация), информационных процессов и включает в себя требования в адрес пользователей информационных систем Министерства энергетики Республики Казахстан, его ведомств и подведомственных организаций в своей деятельности. .

Объяснение:

4,5(95 оценок)
Ответ:
hdn12
hdn12
13.01.2020

program allliyagilmanova666;

const n = -20;

         m = 0;

         l = 10;

var x, y: double;

     proverka: byte;

begin

proverka := 1;

repeat

 writeln('Введите х:');

 readln(x);

 if (x < -20) then y := 2 * x + 1

  else if ((x >= n) and (x <= m)) then y := 4 * x + 8

   else if ((x > m) and (x < l)) then y := 0

    else y := sqr(x) + 2;

 writeln('При х = ', x : 0 : 2, ' y = ', y : 0 : 2);

 writeln('Если хотите продолжить работу введите 1, в противном случае - 0.');

 readln(proverka);

until (proverka = 0);

end.

4,8(61 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ