Составте программу вычесления количества…

71

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

категория: информатика

ответить

в избранное ссылка

47

alex2013

05 марта 2023

program xxx; var i, k, c, e: integerbegin k: =0; for i: =100 to 999 do begin c: =i div 100; e: =i mod 10; if c=e then k: =k+1 end; writeln ('кол-во палиндромов=', k); readlnend.

комментировать

в избранное ссылка отблагодарить

Знаете ответ?

Задайте свой вопрос

Смотрите также:

Срочно плиз прога на паскале текст начинается с ненулевой цифры, за которой…

Составте программу, которая формирует массив из 16-ти случайных чисел от -20 до 20 и…

Программа которая формирует массив из 15 случайных целых чисел от -20 до 20 и четные…

Программа, в которой с клавиатуры вводится слово, состоящее из четного…

Выразите словами смысл следующего арифметического выражения (1+2+3+4+5) / (10-7)=5

1) текст занимает 5 полных страниц. На каждой странице размещается 30 строк по 70…

Дана прямоугольная матрица. Найти строку с наибольшей и наименьшей суммой…

На чем делали записи в древней индии.

Дано n чисел. Замените все отрицательные числа их модулями. Язык…

27400

14821

Английский язык

14215

Биология

7368

719

Экономика

18828

8304

География

15850

Геометрия

5255

Информатика

11817

23331

15992

Литература

73118

Математика

8151

Обществознание

465

Правоведение

46271

Русский язык

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!

Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!

Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...