Есть ответ 👍

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

253
295
Посмотреть ответы 2

Ответы на вопрос:


program raf105;

var

  n, number: integer;

begin

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

  readln(n);

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

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

end.

pascalabc
makon3
4,8(20 оценок)

15 mod 7=15 div 5 - 1   1=0-1 1=-1 результат ложь

Популярно: Информатика