Среди всех натуральных четырехзначных чисел подсчитать количество таких, сумма квадратов цифр, которых кратна двум или трем?

Nastya14122001 10 сент. 2020 г., 09:16:53

Var i, s, k, n : integer ;

begin for i : = 1000 to 9999 do begin n : = i ; s : = 0 ; while n > ; 0 do begin s : = s + (n mod 10) * (n mod 10) ; n : = n div 10 ; end ; if (s mod 2 = 0) or (s mod 3 = 0) then begin k : = k + 1 ; writeln(i, ' ', s) ; end ; end ; writeln(k) ;

end.

Stasevanne26 5 янв. 2020 г., 18:55:45 | 5 - 9 классы

Среди четырёхзначных чисел найти все числа сумма цифр, которых кратно 3 и больше 15?

Среди четырёхзначных чисел найти все числа сумма цифр, которых кратно 3 и больше 15.

Jimova 20 июл. 2020 г., 08:21:01 | 5 - 9 классы

Определить количество натуральных трехзначных чисел сумма цифр которых равна заданному числу N?

Определить количество натуральных трехзначных чисел сумма цифр которых равна заданному числу N.

Chinianin 30 окт. 2020 г., 16:19:10 | 5 - 9 классы

Определить количество натуральных трехзначных чисел сумма цифр которых равна заданному числу N?

Определить количество натуральных трехзначных чисел сумма цифр которых равна заданному числу N.

Varvaravolegova 20 мар. 2020 г., 11:10:06 | 10 - 11 классы

Pascal ABCВычислить сумму квадратов отрицательных чисел, стоящих на местах, кратных 3 ; подсчитать количество чисел, не принадлежащих промежутку [А, В)?

Pascal ABC

Вычислить сумму квадратов отрицательных чисел, стоящих на местах, кратных 3 ; подсчитать количество чисел, не принадлежащих промежутку [А, В).

Artyomka31 11 мая 2020 г., 04:37:07 | 5 - 9 классы

Ребята помогите?

Ребята помогите!

Решать пыталась, но прога выводит ошибки!

Найти все четырехзначные натуральные числа, у которых сумма крайних цифр равна сумме сред - них цифр, а само число делится на число А!

Alexlexay 25 мая 2020 г., 14:22:31 | 10 - 11 классы

Подсчитать количество (сумму)цифр в записи целого неотрицательного числа?

Подсчитать количество (сумму)цифр в записи целого неотрицательного числа.

(в паскале авс).

Polyagrig 9 февр. 2020 г., 09:02:45 | 5 - 9 классы

Дано четырехзначное натуральное число?

Дано четырехзначное натуральное число.

Определить является ли сумма первой и последней цифр кратной 3 Паскаль.

Naonna 15 июн. 2020 г., 22:43:47 | 10 - 11 классы

Среди всех натуральных чентырехзначных чисел подсчитать кол - во таких, сумма квадратов цифр, которых кратна двум или трем?

Среди всех натуральных чентырехзначных чисел подсчитать кол - во таких, сумма квадратов цифр, которых кратна двум или трем.

Madina57 20 мар. 2020 г., 06:06:40 | 10 - 11 классы

Среди всех натуральных четырехзначных чиселподсчитать количество таких,сумма квадратов цифр которыхкратна двум или трем?

Среди всех натуральных четырехзначных чисел

подсчитать количество таких,

сумма квадратов цифр которых

кратна двум или трем.

Ответ записать целым числом.

Vavdhksb 6 янв. 2020 г., 20:50:15 | 5 - 9 классы

С клавиатуры вводится четырехзначное число?

С клавиатуры вводится четырехзначное число.

Необходимо подсчитать сумму цифр этого числа.