Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Max638
26.05.2023 01:20 •
Информатика
Программа на паскале.ввести число,если оно больше 0 разделить его на 2,если меньше или равно то умножить на 5
Ответ:
Милкаi
07.07.2020 01:48
Var x:real;
begin
read(x);
if x>0 then x:=x/2 else
x:=x*5;
write(x);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
LilyBlackk
24.10.2020 15:05
Комбинацию каких клавиш можно переключить клавиатуру в режим другого языка? 1 ) ctrl + shift 2 ) ctrl + enter 3 ) shift + 1 4 ) shift + 7...
Lisa112007
06.07.2022 05:35
100Б! Паскаль. найти половину произведения 10 чисел ...
ЗнайкаЗазнайка228
05.07.2022 10:02
Как можно создавать модели в программе скетчап...
ЛенаКошка
11.02.2022 06:02
Дана таблица.пользователь скопировал формулу из ячейки C2 в ячейку C3опрелели результат ячейки C3?...
MEOWчтательница
04.10.2021 21:56
Вещества по классам неорганических соединений.дайте названия всем предлагаемым веществам. со2; mgci2; h2s; mno2 ; ai2 (sio3) ; mn2o7 ; h2so3; naoh ; fe(no3)2 ; p2o5...
Романтик123098
04.10.2021 21:56
Сизый голубоч.ек , ч..рный кот..к, лакомый кусоч..к, острый ножич..к,...
sirozazuruhin
22.11.2022 11:36
Может ли напряжение на элементе coпротивлением г изменяться по уравнению u=umsin (wt+n/2) сопротивление п хы,г2,x2, гз. хсі cоединены последовательно. определить...
Matvey1678
04.10.2021 21:56
Прочитай текст. випиши іменники чоловічого роду. обережно : бурульки ! нестійкі погодні умови – відлига вдень і заморозки вночі – сприяють активному утворенню бурульок...
Алиса623
04.10.2021 21:56
Перечислите экологические запреты, которые можно будет ввести на материке антарктида. как жить в гармонии с природой в антарктиде?...
GlennRee
17.10.2022 06:00
Решить данные по высшей , буду за ответ)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
read(x);
if x>0 then x:=x/2 else
x:=x*5;
write(x);
end.