даны билеты с номерами от 0001 до 9999, найти кол-во счастливых билетов
5-9 класс
|
var n, i: integer;
begin
n := 0;
for i := 1 to 9999 do
if i mod 10 + i div 10 mod 10 = i div 100 mod 10 + i div 1000 then
n := n + 1;
writeln(n);
end.
Другие вопросы из категории
очередь. Если бы Митя встал посередине очереди, то он стоял бы между Серёжай и Костей, причём Костя стоял бы впереди Мити, а если бы Юра. Но Митя встал впереди своих товарищей. Кто за кем стоит?
2 Задание Пятеро однакласников Аня, Саша, Лена, Вася и Миша стали победителями олимпиад школьников по истроии, математике, информатеки, летературе и географии. Известно, что:
1) Победитель олимпиады по информатике учит Аню и Сашу работе на компьюторе
2) Лена и Вася тоже заинтересовались информатикой
3) Саша всегда побаивался истории
4) Лена, Саша и победитель олимпиады по летературы занимаются плаванием
5)Саша и Лена поздравили победителя олимпиады по математике
6) Аня сожалеет о том, что у нее остаётся мало времени на летературу.
Побидителем какой олимпиады стал каждый из этих ребят?
Поиогите решить спасибо только правильно
Информация каких видов содержится в учебнике по информатике?
Читайте также
Найдите ее, зная номера оставшихся карточек. Входные данные:Дано число N, далее N-1 номер оставшихся карточек (различные числа от 1 до N).
-С номером ,котором будет цифра 2;
-С номером 29 .
последних двух цифр.
Сколько будет «счастливых» среди всех билетов с четырёхзначными номерами?
Как вы это получили?
Входные данные: ввести два целых числа А,В (1 <=А,В<=10).
Входные данные: вывести произведение всех целых чисел от А до В включительно.
3) Даны числа от 1 до n. Найти сумму чисел кратных 5, но не кратных 7.
Помогите пожалуйста!!!)))))