Требовалось написать программу,при выполнении которой с клавиатуры вводится натуральное...

0 голосов
50 просмотров

Требовалось написать программу,при выполнении которой с клавиатуры вводится натуральное число,не превосходящее 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)Найдите в программе все ошибки.


Информатика (15 баллов) | 50 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

1) 4
2) 7
3) мы в цикле берем остаток от деления на 10 => последнюю цифру, нужно поменять на n:=n div 10

(4.7k баллов)
0

Спасибо большое