На pascal. с клавиатуры вводится натуральное - вопрос №1808465111 от eduardpiterskiy 17.02.2022 22:31

Question

Информатика: На pascal. с клавиатуры вводится натуральное чётное число n, не превосходящее 180. определите n-ую цифру в ряду: . в данном ряду подряд выписаны все двузначные числа. на экран вывести одно число - искомую цифру. ​

eduardpiterskiy · Answer

program raf105; var  n, number: integer; begin  write( Введите чётное n: );  readln(n);  number:= (n-2) div 2 mod 10;  writeln( Искомая цифра: ,number); end.PascalABC...