Составить программы 50 БАЛЛОВ
Решение заданий ЕГЭ К3
1)Назовём натуральное пятизначное число N (10000<= N <= 99999) счастливым, если суммы двух его первых и двух последних цифр различаются не более, чем на 2. Найдите количество таких чисел.
2)Назовём натуральное число N (1000(8 степень) <= N <= 7777(8 степень)) счастливым, если суммы двух первых и двух последних цифр его восьмеричной записи равны. Найдите количество таких чисел.
169
419
Ответы на вопрос:
Как-то так: program z; var n, m: byte; begin write('n = '); readln(n); m: =1; while sqr(m)> =n do m: =m+1; writeln('m = ', m); end. 4-2: program d; var i,n,k,a: integer; begin write('n = '); readln(n); k: =0; for i: =1 to n do begin readln(a); if a > 0 then k: =k+1; end; wreteln('k = ', k: 0: 2); end. 4-3: program w; var max, a: integer; n: longint; begin write('n = '); readln(n); max: =10; while n < > 0 do begin a: =n mod 10; if a > max then max: =a; n: =n mod 10; end; readln(max); end.
Популярно: Информатика
-
Аделина260525.05.2020 05:13
-
7Alsu27.06.2021 06:36
-
lizahelp721.07.2021 16:59
-
AsyaUkrainceva29.04.2023 15:10
-
Dinochka9904.09.2021 15:37
-
transformer5612.04.2023 13:19
-
raydin05.12.2021 08:00
-
alena0bashinskaya29.01.2020 17:30
-
хорошист54926.04.2022 23:25
-
Lyadavinchi30.04.2021 00:52