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

Victor789 Victor789    2   14.09.2019 18:58    14

Ответы
vasyamlodp0c2ay vasyamlodp0c2ay  07.10.2020 14:59

program raf105;

var

 n, number: integer;

begin

 write('Введите чётное n: ');

 readln(n);

 number:= (n-2) div 2 mod 10;

 writeln('Искомая цифра: ',number);

end.

PascalABC
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика