Как составить программу на языке программирования Pascal ABC, которая считывает двузначное число и выводит каждую цифру отдельно через пробел?
Информатика 10 класс Программирование на Pascal ABC программа Pascal ABC считывание двузначного числа вывод цифр через пробел язык программирования Pascal работа с числами Pascal
Давайте разберем, как составить программу на языке Pascal ABC, которая будет считывать двузначное число и выводить каждую цифру отдельно через пробел. Мы будем следовать шагам, чтобы сделать это понятным и простым.
Теперь давайте перейдем к написанию программы:
program DigitsOutput;
var
number, tens, units: Integer;
begin
// Считываем двузначное число
Write('Введите двузначное число: ');
ReadLn(number);
// Проверяем, является ли число двузначным
if (number < 10) or (number > 99) then
begin
WriteLn('Ошибка: введите двузначное число.');
Exit;
end;
// Извлекаем десятки и единицы
tens := number div 10; // Получаем десятки
units := number mod 10; // Получаем единицы
// Выводим цифры через пробел
WriteLn(tens, ' ', units);
end.
Объяснение кода:
Таким образом, программа успешно считывает двузначное число и выводит его цифры отдельно. Вы можете протестировать программу, введя разные двузначные числа!