Дано трёхзначное число, проверить является ли цифраотвечающая за сотни кратно 3. ответить языком Паскаля
100
372
Ответы на вопрос:
read (a);
b := (a - (a mod 100))/100;
if b mod 3 = 0 then print ('кратно') else print ('не кратно');
Объяснение:
Популярно: Информатика
-
apomat123426.10.2020 13:13
-
Asig17.10.2022 01:50
-
ЭляВ198817.12.2021 05:48
-
Лисанна201902.05.2021 16:33
-
killmepleaseeee24.10.2022 00:48
-
mai3114.12.2022 04:27
-
nastyabogatiko19.07.2021 09:40
-
ketrin030911.02.2022 05:53
-
Q77827.11.2020 15:15
-
Evaliberman19.06.2023 16:42