Требовалось написать программу,при выполнении которой с клавиатуры вводится натуральное число,не превосходящее 10^8, и выводится его первая цифра.Ученик написал такую программу: var n:longint; begin read(n); while n больше 10...
Требовалось написать программу,при выполнении которой с клавиатуры вводится натуральное число,не превосходящее 10^8, и выводится его первая цифра.Ученик написал такую программу:
var n:longint;
begin
read(n);
while n>10 do
begin
n:=n mod 10
end;
write(n);
end.
1)Напишите,что выведет эта программа при вводе числа 1984.
2)Приведите пример числа,при вводе которого программа выдаст верный ответ.
3)Найдите в программе все ошибки.
Гость
Ответ(ы) на вопрос:
Гость1) 4
2) 7
3) мы в цикле берем остаток от деления на 10 => последнюю цифру, нужно поменять на n:=n div 10
Не нашли ответ?
Похожие вопросы