Паскаль.

вывести на экран квадрат средней цифры пятизначного числа.

Question

Информатика

Каллисфен

18 марта, 15:42

Паскаль.

вывести на экран квадрат средней цифры пятизначного числа.

+1

Ответы (2)

Знаете ответ на вопрос?

Мерона · Answer 1

Var

n:longint;

begin

Write ('Введите пятизначное натуральное число: ') ;

Read (n) ;

Writeln ('Квадрат средней цифры равен ',

sqr ((n div 100) mod 10))

end.

Тестовое решение:

Введите пятизначное натуральное число: 15624

Квадрат средней цифры равен 36

Ядвига · Answer 2

Readln (x) ;

x : = x div 100;

x : = x mod 10;

x : = x * x;

writeln (x) ;

вроде так.

Паскаль.вывести на экран квадрат средней цифры пятизначного числа.

Паскаль.

вывести на экран квадрат средней цифры пятизначного числа.