profile
Опубликовано - 3 дня назад | По предмету Информатика | автор Аноним

Назовем билет с шестизначным номером красивым,если его номер одинаково читается как слева направо, так и с право налево.Сколько

  1. Ответ
    Ответ дан Фролова Алевтина

    Задача просто решается в программе Pascal ABC. Пусть i - числа из промежутка [189980;205505]. В каждом цикле будем находить первые три цифры числа i, последние три цифры числа i,  находить "перевертыш" последних трех цифр числа i, сравнивать первые три цифры числа i с "перевертышем" последних трех цифр числа i. Если они будут равны, значит количество счастливых билетов kol увеличиваем на 1. Программа будет иметь вид.

    n

    program zadacha;

    n

    uses crt;

    n

    var i, e, f, j, k, l, m, p, kol: integer;

    n

    begin

    n

    kol:=0; {начальное значение kol}

    n

    for i:=189980 to 205505 do

    n

    begin

    n

    e:=i div 1000; {первые 3 цифры числа i}

    n

    j:=i mod 1000; {последние 3 цифры числа i}

    n

    f:=j mod 10; {3 цифра числа j}

    n

    k:=j div 100; {1 цифра числа j}

    n

    m:=j div 10; {первые 2 цифры числа j}

    n

    l:=m mod 10; {2 цифра числа  j}

    n

    p:=f*100+l*10+k;  {«перевертыш» числа j}

    n

    if e=p then kol:=kol+1; {сравнение первых трех цифр числа i и «перевертыша» числа j }

    n

    end;

    n

    writeln ('kol=',kol);  {вывод результата на экран}

    n

    end.

    n

    После выполнения программы получаем ответ kol = 17. Значит, среди билетов с данными номерами 17 билетов имеют счастливый номер.

    n

    Ответ: б) 17

    0



Топ пользователи


Hekady (
206)
shozavitya (
180)
znanija (
172)
Eveline (
56)