Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
великобритания - лондон
греция - афины
италия - рим
нидерланды -
франция - париж
program xxx;
var i, k, d, e, s : integer;
begin
k: =0;
for i: = 10 to 99 do
d: = i div 10;
e: = i mod 10;
s: =d + e;
if i mod s = 0 then k: =k+1
end;
write ('кол-во чисел которые делятся на сумму своих цифр=', k);
readln
end.
а-1; мама-4; весна-5 - количество букв
а-1; шея-2; мама-2; огурец-3 - количество гласных
а-0; шея-1; мама-2; огурец-3 - количество согласных
космонафт відповідь на
Популярные вопросы