1. Информатика
  2. Решить в паскале. если

Решить в паскале. если число является двузначным и чётным уменьшить его в 2 раза иначе увеличить на 10 раз

89109949335 89109949335    3   02.09.2019 07:10    5

Ответы
Avakado01 Avakado01  26.08.2020 13:46
Var A:integer;
Begin
Write('Введите целое число: ');ReadLn(A);
if (A>9)and(A<100)and(A mod 2 = 0) then A:=A div 2
else A:=A+10;
WriteLn(A);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
sspamit sspamit  18.11.2020 00:24
Установите соответствие между компьютерными и аналогичными им Не компьютерными объектами Имя файла. Библиотека Файл. Шкаф Папка Полка Диск. Книга Вложенная папка Название...
Ytbjfdg Ytbjfdg  27.08.2019 06:10
Выражения (a v b) & (a v b v c) a v b v (a (подчеркивание вверху) v b) v c & d a & (a (подчеркивание вверху) v b) a& b v a & b (подчеркивание вверху)...
LitRoboBoytle LitRoboBoytle  19.12.2019 13:28
Перевести блок схему на язык vb...
pika9999777 pika9999777  19.12.2019 13:24
Говорят,что компьютер списали с человека.один ученик считает это верным,а другой опровергает это утверждение. по 3-5 аргументов в защиту каждого ученика !...
ГлебGleb39 ГлебGleb39  19.12.2019 13:22
Вшколе с углубленным изучением иностранных языков провели опрос среди 100 учащихся. ученикам задали вопрос: какие иностранные языки вы изучаете? . выяснилось, что 48 учеников изучают...
katrin7878 katrin7878  13.06.2021 12:07
Для логического выражения построить логическую схему...
Nanaw45 Nanaw45  13.06.2021 12:08
Артур составляет 6 -буквенные коды из букв З, Д, А, Н, И, Е. Каждую букву нужно использовать ровно один раз, при этом нельзя ставить рядом ни две гласные, ни две согласные. Сколько...
August333 August333  11.11.2020 09:32
1.Чем в информатике интересно число 256?2.Объясните почему и с чем связано появление 10, 2, 8 и 16 систем счисления (про каждую расскажите подробно)3.Чем позиционная система отличается...
olegmelkov olegmelkov  10.04.2019 17:18
Для каждого из имён вычислите значение логического выражения: первая буква гласная ^ вторая буква согласная . руслан, анна, степан, егор...
Tgfdvbgg Tgfdvbgg  24.05.2019 10:00
Международные торгово-финансовые связи испании ( что экспортируют)...

Популярные вопросы