Войти Регистрация Спроси ai-bota

Уменьшите данное число (х) в 2 раза если оно четное! информатика

Показать ответ

Ответ:

Лейла011

03.10.2020 23:07

Var
x:integer;
begin
readln(x);
if x mod 2=0 then x:=x div 2;
writeln(x);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

skillvirex

06.05.2022 10:10

Если каждый элемент множества b является элементом множества a, то говорят, что a...

awatif768

07.07.2021 15:11

ограничение времени 1 секундаограничение памяти 256mbввод стандартный ввод или input.txtвывод стандартный вывод или output.txtэскадра инопланетных летающих тарелок приблизилась...

Алина052408

03.09.2020 07:08

Вася в школе изучал системы счисления. он заметил, что, например, число 9 в двоичной системе счисления записывается 1001, число 100 в троичной системе счисления записывается...

toyru556

19.10.2021 03:48

Даны натуральные числа k и n. составить программу формирования массива а, элементами которого являются числа, сумма цифр которых равна k и которые не больше n. составить...

ZABENOK123

22.02.2023 02:07

Написать программу на pyton 3 несколько дней подряд метеоролог измеряет температуру воздуха в своём городе. ваша программа считывает измеренные им значения и выводит среднее...

SargonTM

28.04.2023 12:43

Исполнитель чертёжник перемещается на координатной плоскости оставляя след в виде линии чертёжник может выполнять команду сместиться на (а; b) (где аb целые числа), перемещающую...

kerikmr1

23.12.2021 21:46

Чему равны веса разрядов слева от точки, разделяющей целую и дробную часть, в двоичное, восьмеричной и шестнадцатеричной системах счисления?...

domofon98

22.01.2023 05:00

Ичто такое сайт это 1) архив почтовых сообщений 2) программа предназначена для работы с телеконференциями...

gjkbyf1984

14.07.2021 08:11

Нужно ! написать доклад на тему базы данных и интернет ....

татьянаивановна1

16.06.2022 13:44

Информатика, , язык паскаль, заранее !...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку