Question

Задание для 10 класса. Решить задачу, через программу. даю 50 баллов.

Вводится 3-значное число с клавиатуры.
Вывести цифр которых равна среднему арифметическому других двух цифр введённого числа.​

Answer 1

это паскаль если чо

var n, first, second, third: integer;

begin

write('Enter a 3-digit number: ');

readln(n);

first := n div 100;

second := (n div 10) mod 10;

third := n mod 10;

write((first + second + third) div 3);

end.