сервис вопросов и ответовТрамвайный билет имеет шестизначный номер(от 100000 до 999999). Выяснить, является ли билет "счастливым". Билет назовем "счастливым", если первая и
10-11 класс|
|
последняя цифра билета являются натуральными ( т.е. делятся на 1 и на само себя ).
Yulijaisaeva200щ
20 окт. 2014 г., 20:35:27 (9 лет назад)
AnonimkaA
20 окт. 2014 г., 22:43:14 (9 лет назад)
var
j, k, l, m : Word;
A : array [0..27] of Integer; {27 потому что максимальная сумма трех цифр 27, т.е. 9+9+9}
begin
ClrScr;
Writeln ('счастливый билет');
for j:=1 to 27 do A[j]:=0;
for j:=0 to 9 do
for k:=0 to 9 do
for l:=0 to 9 do
A[j+k+l] := A[j+k+l] + 1;
m := 0;
for j:=0 to 27 do
m := m + A[j]*A[j];
WriteLn(m);
ReadLn; {это чтобы увидеть результат}
end.
А если требуется все-таки "лобовое", то можно так
m := 0;
for k:=0 to 999999 do begin
Str(k, SS);
SS := Copy('000000', 1, 6 - Length(SS)) + SS; {дополняем слева нулями при необходимости}
if (Ord(SS[1])-48+Ord(SS[2])-48+Ord(SS[3])-48) = (Ord(SS[4])-48+Ord(SS[5])-48+Ord(SS[6])-48) then
Inc(m);
end;
Остальное сами.
Ответить
Другие вопросы из категории
В процессе преобразования растрового графического файла его объем уменьшился в 2 раза. Сколько цветов было в палитре первоначально, если после
преобразования было получено растровое изображение того же размера в 256-цветовой палитре?
Создать на Паскале форму.
1. Население некоторой страны в 1904 году составляло а человек. По переписи населения, проведенной в прошлом году, зарегистрировано b человек. Составить программу вычисления среднегодового прироста населения за этот период.
2. Составить программу определения, является ли введенный год високосным?
3. Составить программу определения размера денежного вклада через t лет после его внесения, если заданы размер начального взноса n и банковский процент b.
4. Для условий из предыдущей задачи определить, через сколько лет размер вклада превысит вдвое первоначальный взнос.
Напишите программу, которая принимает с клавиатуры числа, пока не будет введено значение 999. Программа должна подсчитать, сколько значений было
введено с клавиатуры (не считая значения 999) и вывести эту информацию на экран.
Читайте также
Трамвайный билет имеет шестизначный номер(от 100000 до 999999). Выяснить, является ли билет "счастливым". Билет назовем "счастливым", если сумма
первых трёх чисел равна сумме трёх других чисел. Через цикл whili, а также div mod
Даны n строк, каждая имеет свой номер - от 0 до n. В нулевой строке записано число 0. Все остальные строки формируются по
следующему правилу:
в k-ю строку дважды записывается (k-1)-я строка, затем в конец строки записывается её номер k.
Ниже показаны первые четыре строки, сформированные по описанному правилу:
0
001
0010012
001001200100123
Какая цифра стоит в 9-й строке на 1021 месте?
Определить, является ли «счастливым» трамвайный билет с шестизначным номером
(«счастливым» считается билет, у которого сумма первых трёх чисел совпадает с
суммой трёх последних чисел).
Для кодирования номеров автомобилей принята следующая структура данных: Номер региона (двузначное число от 00 до 99), серия (комбинация из трех букв из
набора «А, В, Е, К, М, Н, О, Р, С, Т, У, Х»), номер (трехзначное число от 000 до 999). При создании базы данных автомобильных номеров Петя решил хранить каждый номер в виде массива из 8 символов (два символа на номер региона, три символа на серию и три символа на номер), кодируя каждый символ с помощью однобайтной кодировки ASCII. Вася решил уменьшить объем хранимых данных и принял решение хранить каждый номер в виде трех чисел – одно число для номера региона, одно число для серии (представив все возможные серии в виде натуральных чисел) и одно число для номера. Каждое число Вася будет хранить отдельно, используя для его кодирования минимально возможное число бит. На сколько бит уменьшится объем памяти, необходимый для хранения одного произвольного номера, в варианте кодирования Васи по сравнению с вариантом кодирования Пети? В ответе укажите целое число.
По заданному числу n от 1 до 365 определите, на какое число какого месяца приходится день невисокосного года с номером n. Программа получает на вход
целое число n и должна вывести два числа: число месяца (от 1 до 31) и номер месяца (от 1 до 12), на которое приходится данный день.
Вы находитесь на странице вопроса "Трамвайный билет имеет шестизначный номер(от 100000 до 999999). Выяснить, является ли билет "счастливым". Билет назовем "счастливым", если первая и", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.