Задать вопрос
15 октября, 14:39

Составьте программу вычисления количества трёхзначных чисел-палиндромов.

+3
Ответы (1)
  1. 15 октября, 15:43
    0
    var i, s:integer;

    Begin

    for i : = 100 to 999 do

    if (i mod 10 = i div 100) then s=s+1;

    writeln (s) ;

    End
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Составьте программу вычисления количества трёхзначных чисел-палиндромов. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы