Паскаль.

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

Question

Информатика

Василиска

7 октября, 01:44

Паскаль.

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

+2

Ответы (2)

Знаете ответ?

Мавра · Answer 1

Readln (x) ;

x : = x div 100;

x : = x mod 10;

x : = x * x;

writeln (x) ;

вроде так.

Никаха · Answer 2

Var

n:longint;

begin

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

Read (n) ;

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

sqr ((n div 100) mod 10))

end.

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

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

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

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

Паскаль.

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