Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
MariSar
14.03.2021 18:50 •
Информатика
Написать в pascal. даны два числа, если второе число отрицательное, необходимо уменьшить первое число в 5 раз, иначе числа оставить без изменения
Показать ответ
Ответ:
Ramzi085
02.07.2020 23:13
Var a,b:real;
begin
readln(a,b);
if (abs(a)>b) or (b<0) then
begin
a:=a/5;
writeln(a,' ',b)
end
else
writeln(a,' ',b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ssqllxx
11.05.2023 04:34
Племя Мумба пишет письма, пользуясь 16-символьным алфавитом. Племя Мамба пользуется 32 символьным алфавитом. Вожди племен обменялись письмами. Письмо племени Мумба...
ПАПА121211
20.11.2020 06:29
Взаимосвязь информатики и информации...
ИлонаУстюгова12
20.11.2020 06:29
Написать программу,выводящую в столбик значение квадратов целых чисел от 11 до 20 (паскаль)...
gukalovaekateri
26.07.2022 02:17
Вычислите сумму чисел x и y, если x=77116, y=11018. результат представьте в двоичной системе счисления...
shaxnozatosheva
14.03.2021 13:06
Память для временного хранения информации подскажите как называется? и еще устройство для считыания и записи на диски информации? как называется съемный диск.? подскажите...
муза2007
13.09.2022 10:55
1) производится одноканальная (моно) звукозапись с частотой дискретизации 128 гц. при записи использовались 64 уровня дискретизации. запись длится 6 минут 24 секунд,...
Dasha5901
13.09.2022 10:55
Дано число а. определить, является ли оно простым (простое это натуральное число имеющие ровно два различных натуральных делителя: пшеницы и само себя)...
RitaTrott
13.09.2022 10:55
Рассчитайте объём памяти, необходимый для кодирования рисунка, построенного при графическом разрешениимонитора800х600 с палитрой 32 цвета. какой объем видеопамяти...
imbiz
18.02.2023 09:12
Средняя скорость передачи данных по некоторому каналу связи равна 28 800 бит/с. сколько секунд потребуется для передачи по этому каналу цветного изображения размером...
АлинаКравченко
28.09.2020 10:38
Решить примеры в шестнатеричной системе счисления: 1e0-f5,1013-ab,3f5-cf,2013-210. !...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a,b);
if (abs(a)>b) or (b<0) then
begin
a:=a/5;
writeln(a,' ',b)
end
else
writeln(a,' ',b);
end.