Напишите программу для решения с клавиатуры вводится - вопрос №94773613 от jolyy 08.03.2023 18:26

Question

Информатика: Напишите программу для решения с клавиатуры вводится целое положительное 3-значное число ,если число четное то вычислить и вывести на экран все цифры числа каждую цифру в отдельной строке

jolyy · Answer

PascalABC.NET 3.4.2, сборка 1847 от 28.10.2018Внимание! Если программа не работает, обновите версию!

begin

var n := ReadInteger;

if n.IsEven then n.ToString.ToCharArray.PrintLines

end.

518518