Составить программу для решения : задай число, определите, кратно ли оно10

pascal

var n: longint;

begin

read(n);

if n mod 10=0 then writeln('kratno') else writeln('net');

end.

Саша - комбайнер

Петя - садовник

Коля - тракторист

Объяснение:

Петя, ты меня не жди, я должен осмотреть свой комбайн, значит Петя не комбайнер.

Завтра, Коля, не приходи, я буду регулировать работу молотилки у комбайна, значит Коля тоже не комбайнер.

Остается только Саша - комбайнер.

Наблюдал я вчера, Коля, твой осмотр машины и подумал, что держать машину в отличном состоянии не легче, чем вывести новый сорт яблок.

Остались 2 прфессии: садовник и тракторист, если Петя наблюдал за ремонтом машины, значит он садовник, следовательно Коля - тракторист.

(Задача похожая на твою,подставь свои цифры))"В классе 28 учеников(-а), из них 12 школьников занимаются в математическом кружке, 6 — в литературном, 6 литераторов увлекаются математикой. Сколько ребят не посещают эти кружки? Используй для решения круги Эйлера."

Объяснение:

Всего 35 учеников. 10 кружки не посещают. Значит, посещают кружки 35-10=25 учеников.

25 учеников посещают кружки. 20 учеников занимаются в математическом кружке. Значит, только литературный кружок посещают 25-20=5 человек. В литературном кружке 11 человек. Лишь 5 из них посещают только литературный кружок.

Значит, 11-5 = 6 человек-литераторов посещают ещё и математический кружок.