-Определить,начинается ли число на цифру 7
В паскале !!
var
a: integer;
begin
readln(a);
repeat
a := a div 10;
until a < 10;
if(a = 7) then writeln(Да, это число начинается на 7) else
writeln(Нет, это число не начинается на 7);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
