tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составте программу в
Составте программу в pascal abc где необходимо ввести некоторое целое число и, если оно чётное, уменьшить его в 2 раза
Настя9876899
3 07.09.2019 06:20
0
Ответы
natali250374mailru
06.10.2020 22:34
Var
a:integer;
begin
write('a=');
readln(a);
if odd(a) then writeln(a/2:6:2);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
1Gamzatik1
15.08.2019 07:20
Расположите величины в порядке убывания: 1024 бита, 1000 байт, 1 бит, 1 байт, 1 килобайт...
michael48
26.11.2020 15:17
5 примеров вычислительных экспериментов...
даниял09062007
26.11.2020 15:17
Автоматична зміна адрес клітинок називається Автозавершенням Відсутня правильна відповідь Модифікацією Автозаповненням Питання №4 ? Маленький чорний квадрат в правому нижньому...
Djessika24
26.11.2020 15:17
Вкажіть на інструменти для копіювання та переміщення клітинок і діапазонів...
gordeeva2003
26.11.2020 15:19
найдите программу которая находит сумму покупок 3 товаров. если сумма товаров превышает 1000 сом, то экран вывести сообщение «Недостаточно средств». Если сумма покупок меньше...
edikmarik
26.11.2020 15:19
с этим задание и пишите нормальные ответы...
rufina1995
26.11.2020 15:25
Какой логической функции соответствует данная схема? заранее...
KeeRuSha
26.11.2020 15:30
Можете сказать что бы ноутбук не выделял много производительности на электро питание настройки для них Винда 10...
olgagolikova2
26.11.2020 15:30
Задано игровое поле следующего вида: Стрелка – точка старта объекта. Направление стрелки – то, куда смотрит объект перед началом движения Необходимо составить алгоритм движения...
timur77553344
26.11.2020 15:31
Познакомься с окном программы пейнт. Напиши элементы окна в тетради....
Популярные вопросы
Заполните пропуски правильными формами глагола to be:1)I. at school 2) he...
2
1. Скласти рівняння прямої, яка паралельна прямій і проходить через центр...
3
Вставить предлоги. Complete the sentences with the given prepositions. Буду...
1
Реши задачу. (ответ округли до сотых.) Скорость распространения звука в воздухе...
3
Прямая с пересекает две параллельные прямые а и b. Отметь, которые из углов...
2
Добрый день!Напишите происхождение,краткую историю и правила игры Баскетбола...
3
Решите уравнение:а) 3х - 2 =0;б) 7х + 15 = 10x - 3 паже...
3
Составьте формулы оксидов, соответствующих вещест- вам, формулы которых: Fe(OH),...
2
Добрые люди с тестом очень надо. Я вам поставлю 5 звезд и...
3
При составлении пищевой цепи на первом месте нужно поставить: а )растение...
3
a:integer;
begin
write('a=');
readln(a);
if odd(a) then writeln(a/2:6:2);
end.