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

Есть ответ
17.12.2022
352

Ответ


//Pascal ABC.NET 3.1 сборка 1256Var a:integer; s:string;beginreadln(a);s:=inttostr(a);if length(s)=2 then  begin  writeln('Десятков:',s[1]);  write('Единиц:',s[2]); end else writeln('Число двузначным не является');end.Пример ввода:27Пример вывода:Десятков:2Единиц:7


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.