Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Novaya22
18.03.2023 21:48 •
Информатика
Написать программу у pascal
Показать ответ
Ответ:
EnenkoDana
09.02.2022 17:10
var
x,y:integer;
begin
read(x);
if x<=0 then
writeln('y=', x+20)
else
writeln('y=', x*20);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Hatmonu
07.07.2022 01:06
1. в ящике лежат 36 красных и несколько зеленых яблок. сообщение из ящика достали зеленое яблоко несет 2 бита информации .сколько яблок в ящике? 2.в концертном зале 270...
Лаймик0
14.11.2022 21:31
Придумать тему для создания базы данных...
RABOTAY
25.03.2020 09:09
очень нужно. НУЖНО НАПИСАТЬ ПРОГРАММУ В Python массив нужно вводить самим с клавиатурыэто нужно вставить в конецlist.append(x)добавление элемента х в конец списка list...
nnxxxmm5p03cok
07.09.2020 19:36
Какому классу программного обеспечения относятся: ms word, norton антивирус, paint pascal abc, windows 2010, антивирусная программа, блокнот, калькулятор, клавиатурный...
азамат126
20.03.2020 06:56
Всистеме счисления с некоторым основанием число 17 записывается как 101 укажите какое это основание...
shamilovaam
01.04.2020 03:34
Для паскаля нужно расситать траекторию полёта спутника в поле тяготения двойной звезды, ( можно для взять 2 небесных тела типа земли с расстоянием между ними 20 радиусов...
Finik2100
04.01.2022 12:56
6) Для каждого утверждения из левого столбца укажите соответствующее ему равенство из правого столбца.1) (2x - 3) + 2 = 4x + 12) (2x - 3)-(4x + 1) = 2А) значение выражения...
жenya
13.02.2022 22:04
2. Read the text and complete it with the words from the box. online mobile-learning digitize tablets the Internet technology The World s First «Smart Education System...
ainexl
13.06.2022 13:19
на сторонах AB, BC, AC треугольника ABC отмечены точки T, P, M соответственно ∠MPC=51°, ∠ABC=52°, ∠ATM=52°. а) найдите ∠TMP б) докажите что прямые MP и BT имеют одну общую...
lord50
19.10.2020 22:50
Какие проблемы вставали в правление Екатерины 2 и как она решала их?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
x,y:integer;
begin
read(x);
if x<=0 then
writeln('y=', x+20)
else
writeln('y=', x*20);
end.