Паскаль.

Задано натуральное число n. Вывести первые две цифры заданного числа.

Question

Фелиция

2 октября, 18:22

+4

Ответы (1)

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

Юня · Answer 1

Var n:integer;

Begin

Write ('n = '); ReadLn (n);

While n div 100 > 0 do

Begin

n:=n div 10

End;

WriteLn (n)

End.

Паскаль.Задано натуральное число n. Вывести первые две цифры заданного числа.