Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
уточни ато очень много ошибок место то го что бы писать как надо пишешь набор букв на English
Объяснение:
телефон | зонтик
наушник | спица
корпус | стержень
диск | купол
микрофон | рукоятка
провод | рубка
program xxx;
var i, k, c, e : integer
begin
k: =0;
for i: =100 to 999 do
c: = i div 100;
e: =i mod 10;
if c = e then k: =k+1
end;
writeln('кол-во палиндромов =', k);
readln
end.
Популярные вопросы