Определить,начинается ли число на цифру 7 в паскале

ккк130 ккк130    3   20.05.2019 03:30    0

Ответы
тадашихамада1 тадашихамада1  13.06.2020 10:29

var
  a: integer;
begin
  readln(a);
  repeat
    a := a div 10;
  until a < 10;
  if(a = 7) then writeln('Да, это число начинается на 7') else
    writeln('Нет, это число не начинается на 7');
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика