Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
sadyk771
08.02.2020 09:52 •
Информатика
Составить программу y= a+5, если a< =0, 1/a, если 0 в остальных случаях
Ответ:
LoveSmile7890
23.09.2020 12:56
Var a,y:real;
begin
readln(a);
if (a<=0)then y:=a+5 else
if (a>0) and (a<1)then y:=1/a else y:=sqr(a);
print(y);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
сэрго2002
13.09.2022 18:57
Три свидетеля дорожного происшествия сообщили сведения о скрывшемся нарушителе. Эдгар утверждает, что тот был на белом «Renault», Вадим сказал, что нарушитель уехал на серой «Audi»,...
wereweek777
30.05.2022 19:32
Сколько цветов можно закодировать, если каждый цвет кодировать 9 битами...
Torquis
26.10.2022 02:50
50 система команд исполнителя вычислитель состоит из двух команд: 1 – вычти 1 2 – умножь на 3 первая из них уменьшает число на 1, вторая увеличивает число в 3 раза. при записи алгоритмов...
aninagalamova
25.02.2020 17:34
Сказка две сестры какие глаголы вставить...
darmon2121
25.02.2020 17:34
Придумать рецепт на части с решением заранее...
KoRmlx
25.02.2020 17:34
Определить массу осадка гидроксида меди, который может быть получен из 400 г сульфата меди, содержащего 20% примесей....
Рикон1
25.02.2020 17:34
Рост саши х рост наташи у рост вовы z найти средний рост...
Ga1axI
25.02.2020 17:34
Как называется дерево растущее перед дворцом князя гвидона под которым находится хрустальный дом белки...
Uoywex
25.02.2020 17:34
Укажи глагол первого спряжения 1)спешить 2)обидеть 3)выходить 4)ехать...
warfacegamer01
25.02.2020 17:34
Подберите коэффициенты , расставьте валентность в бинарных соединениях и назовите их 1.с2о3+k2s2о7= c2(sо4)3+k2so4 2.ca3p2+h2o= ca(oh)2+ph3 3.zhso4+khso3= zhco3+k2so4+k2co3+co2+h2o...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
readln(a);
if (a<=0)then y:=a+5 else
if (a>0) and (a<1)then y:=1/a else y:=sqr(a);
print(y);
end.