Question

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

Answer 1

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

Answer 2

В языке программирования Паскаль можно определить, начинается ли число на цифру 7.

Определение начала числа на цифру 7 в Паскале

В Паскале можно проверить, начинается ли число на цифру 7, сравнив первую цифру числа с 7. Если первая цифра равна 7, то число начинается на цифру 7.

Вот пример кода на Паскале, который проверяет, начинается ли число на цифру 7:

program CheckNumber;

var
  number: integer;

begin
  writeln('Введите число:');
  readln(number);
  
  if (number div 10) = 7 then
    writeln('Число начинается на цифру 7')
  else
    writeln('Число не начинается на цифру 7');
end.

В этом примере программа считывает число с клавиатуры и проверяет, начинается ли оно на цифру 7. Если да, то выводится сообщение "Число начинается на цифру 7", в противном случае выводится сообщение "Число не начинается на цифру 7".

Пример работы программы

``` Введите число: 745 Число начинается на цифру 7 ```

Введите число:
123
Число не начинается на цифру 7

Примечание

Данный код приведен в качестве примера и может быть изменен или дополнен в зависимости от конкретных требований и задачи, которую вы хотите решить.

Источники: -