Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
nazarpetrenko1
04.01.2023 06:32 •
Информатика
Запишите языка программирования команду если значение переменной а меньше или равно 100, то значение а увеличивается в 10 раз, если больше 100 - уменьшается в 10 раз. на языке паскаль
Показать ответ
Ответ:
Sofa29122005
01.10.2020 13:03
Var a:real;
Begin
Write('Число: '); readln(a);
if (a<=100) then a:=a*10
else a:=a/100;
Writeln(a);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
СВЕТЛАНУШЕНЬКА
28.07.2022 04:41
5.В главном меню стрелка справа напротив некоторых пунктов: запускает приложение;сворачивает этот пункт;раскрывает подменю;открывает окно....
brll1bellrf43
26.10.2020 14:05
12 ! сделать из одного слова другое, меняя одну букву. существительное должно быть в им.падеже. а) рота б) бант коса в) бег шаг г) море д) решить можно не !...
Ростик22812312
24.12.2022 07:07
Пиксель на экране монитора представляет собой * минимальный участок изображения, которому независимым образом можно задать цвет двоичный код графической информации электронный...
rfege91
26.02.2020 07:12
написать команды робота в программе Кумир , чтобы тот дошёл до закрашенной клетки, при этом закрашивая всё на своём пути и не врезаясь в стены. ГЛАВНОЕ: нужно написать такие...
merinovamilania
04.04.2021 13:23
Выберите правильное высказывание...
diassultanov1
19.01.2021 16:34
Даю 50 б. Each of these sentences has a mistake in it. Write the correct sentence. 1 The girls play tennis at the moment. 2 Both my brothers like sport. 3 Anna wearing new...
Kirilloo673
19.01.2021 16:34
класс Тіла масою 1 кг і 3 кг рухаються з однаковими швидкостями. Яке з них має більшу кінетичну енергію?...
szelenkooz1uqs
20.12.2020 22:45
Очень Математический и пружинный маятники совершают колебания с одинаковым периодом. Определи массу груза пружинного маятника, если коэффициент жёсткости пружины — 14 Н/м,...
ятупик2
10.11.2022 01:56
Какое из животных исчезло с лица Земли всего за 27 лет?странствующий голубьзебра кваггастепной тарпанстеллерова короваголубь дронт...
lexazykov20014
05.05.2020 16:50
решить задание, ХИМИЯ решить задание, ХИМИЯ >...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
Write('Число: '); readln(a);
if (a<=100) then a:=a*10
else a:=a/100;
Writeln(a);
End.