Question

Напишите программу, которая выводит в столбик цифры введённого числа, начиная с первой. К примеру Было 123456 Должно стать 1 2 3 4 5 5 Программа должна быть написана на языке паскаль.

Answer 1

программa, которая выводит в столбик цифры введённого числа

Answer 2

Для того чтобы написать программу на языке Паскаль, которая будет выводить цифры введённого числа в столбик, можно использовать следующий код:

pascalCopy code
program PrintDigitsInColumn;

var
  num, digit, temp: Integer;

begin
  // Ввод числа с клавиатуры
  Write('Введите число: ');
  ReadLn(num);

  // Вывод цифр числа в столбик
  WriteLn('Цифры введенного числа в столбик:');

  // Обрабатываем каждую цифру числа
  temp := num;
  while temp > 0 do
  begin
    // Получаем последнюю цифру числа
    digit := temp mod 10;

    // Выводим цифру в столбик
    WriteLn(digit);

    // Убираем последнюю цифру из числа
    temp := temp div 10;
  end;

end.

С помощью этой программы пользователь может ввести число, например, 123456, и на экране будут выведены цифры этого числа в столбик:

Copy code
Введите число: 123456
Цифры введенного числа в столбик:
1
2
3
4
5
6

Программа работает для чисел с любым количеством цифр.