10. Напишите программу, которая в последовательности натуральных чисел находит среднее арифметическое чисел, кратных 8, или сообщает, что таких чисел нет (выводит «NO»). Программа должна вывести среднее арифметическое чисел, кратных 8, или вывести «NO», если таких чисел нет
на языке программирования питон
150
482
Ответы на вопрос:
Вам вряд ли задали так сделать, но всё же. var a,b: integer; d: string; begin writeln (' введи число'); readln(b); str (b, d); for a: =length(d) downto 1 do begin write(d[a]); end; writeln(''); end. лучше так напиши. var a,b,c: integer; begin write('введите число=> '); readln(a); write('обратное число=> '); while (a< > 0) do begin b: =a mod 10; write(b); a: =a div 10; end; end.
Популярно: Информатика
-
shaxrizat125.02.2020 11:39
-
юлия2004330.01.2020 20:59
-
екатерина2413109.08.2021 19:25
-
lanaruden22.03.2023 19:31
-
Melentii06.08.2021 23:53
-
tryx102.10.2020 05:12
-
greennattea24.12.2020 06:33
-
katyymii26.05.2022 01:14
-
lolaaaaa201.01.2021 06:46
-
coollkid17.04.2020 07:35