Найти количество двузначных чисел которые делятся на сумму своих цифр
Ksiloffie
3
31.03.2019 11:18
2
Другие вопросы по теме Информатика
emin551
07.04.2021 15:13
anonimus8310
07.04.2021 15:13
JuliaPetrova56
07.04.2021 15:13
kilbas1ggttyi
07.04.2021 15:14
altay2007
21.07.2019 21:00
sdiana1605
11.08.2019 22:00
rassvet1123
19.10.2020 03:58
sashademidova12345
27.09.2019 16:20
ЯестьПаша
27.09.2019 16:20
Популярные вопросы
- Сағырақ бірлікпен өрнектеп жаз: рат миллиметрмен: 1м2. 9 дм2; 87 дм2; 102...
3 - Конфета гулливер и плитка шоколада стоят 64 руб., а плитка шоколада и 5...
3 - Найдите площадь и диаметр круга, если длина окружности равна 52 см. 30...
2 - Put the verbs in brakets into present simple or present perfect continuons.1don...
1 - Не могу решить уравнение225-15y...
2 - Самостоятельная в инете нет , надо...
2 - Вопросы по повести «княжна мери» 1. в каких городах происходит действие...
3 - Тело бросили горизонтально из окна со скоростью 5мс. определите дальность...
2 - Дайте характеристику промышленности центрального казахстана ! максимальное...
2 - Вшколе 90 пятиклассников. две пятых всех пятиклассников поехали на экскурсию...
3
var i,k,s:integer;
begin
k:=0;
for i:=10 to 99 do
begin
s:=0;
s:=s+i mod 10 +i div 10;
if i mod s=0 then k:=k+1;
writeln('s=',s,' i=',i,' k=',k);
end;
write('k=',k);
end.