Предмет: Информатика, автор: dad23062005

Дано трёхзначное число, проверить является ли цифраотвечающая за сотни кратно 3. Ответить языком Паскаля

Ответы

Автор ответа: veretovatv
2

Ответ:

read (a);

b := (a - (a mod 100))/100;

if b mod 3 = 0 then print ('кратно') else print ('не кратно');

Объяснение:

Интересные вопросы
Предмет: Математика, автор: Аноним
Предмет: История, автор: КАРТОФЕЛЬ111БОРИС