Ввести число если оно четное разделить его на 4 если не четное умножить на 5

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

Ответ:

Roguesquid

31.07.2020 11:51

Pascal abc

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

Ответ:

Dimkaumnik1

31.07.2020 11:51

Var A : Integer;
Begin
Readln(A);
If Odd(A) then A:=A*5 else A:=A div 4;
Writeln(A);
end.

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

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

vicroriaalakoz3

27.05.2022 05:30

Информатика 4 и 5 задания ...

Mockingbird666

27.08.2021 08:38

Морена1

06.10.2022 23:41

Tata270204

23.05.2022 02:29

1234567890987078

09.12.2021 12:00

promes2710

17.08.2020 12:49

сорВыберите 3 верных высказыванийВерных ответов 3...

daniilbabics

04.07.2020 16:16

информатику информатику...

89539123898

05.03.2023 12:42

Nika1337228

10.03.2023 14:14

Люди построить таблицу истинности....

Алина0811111

08.08.2021 12:20

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

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