Информатика, опубликовано 2018-08-22 18:16:45 by Гость
Дано натуральное число n, найти первую цифру числа n. в Паскале. очень надо, пожалуйчста..)
Ответ оставил Гость
var n,pr:integer;
begin
writeln(Vvedite n);
readln(n);
while n>9 do
n:=n div 10;
pr:=n;
writeln(pr);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на