Ввести двузначное число определить есть ли в его составе цифры кратные 6
Абвгдежз1234567890
2
03.10.2019 18:20
1
Другие вопросы по теме Информатика
vishnya39
17.08.2019 13:20
Versusmag228
17.08.2019 13:20
lizperepelitsa
17.08.2019 13:20
аноним12345567808
17.08.2019 13:20
топтип
17.08.2019 13:20
thomsonrubi
17.08.2019 13:10
sofi200703
17.08.2019 13:10
Frienden
17.08.2019 13:00
Популярные вопросы
- 1. Распределите страны : Канада, Казахстан, Швеция, Китай, Россия,Саудовская...
3 - Екі қаланың арақашықтығы 600 км егер жүк машинаның жылдамдығы 60...
1 - Переведите без переводчика на английский Основные экологические...
3 - Кандай озендеармен таулардын аттарын билесиндер...
1 - Два любых быстро решите! Заранее...
1 - Рассмотрите иллюстрацию, дайте название, опишите причину возникновения...
2 - өлеңдегі автор бейнесін анықтаңдар. Шығамын тірі болсам адам болып...
3 - Роль ссср после второй мировой войны...
3 - Как называется данный углеводород ? 1)2,3,5 -триметилгексан 2)...
2 - При каком значении переменной значение выражения 1,5|-- 3| равно...
1
var a: integer;
begin
write('Введите двузначное число: ');
readln(a);
if (a mod 10 = 6) or (a div 10 = 6) then writeln('В его составе есть цифры кратные 6')
else writeln('В его составе нет цифр кратных 6')
end.