Даётся одно любое двухзначное число, необходимо вывести на экpан 2 числа из которых оно состоит

(в программе паскаль)

Question

Информатика

Милетя

25 марта, 20:41

Даётся одно любое двухзначное число, необходимо вывести на экpан 2 числа из которых оно состоит

(в программе паскаль)

+2

Ответы (2)

Знаете ответ на вопрос?

Арсеня · Answer 1

A: integer;

begin

readln (a) ;

writeln (a - 1,' ',1) ;

end.

Феодор · Answer 2

Program chisla;

uses crt;

var a, b, c : integer;

begin

write ('Введите двузначное число: ') ;

Readln (a) ;

if (a>99) or (a<10) then Writeln ('Введено не двузначное число') else

begin

b:=a div 10;

c:=a - (b*10) ;

Writeln (b,',', c) ;

end

end.

Даётся одно любое двухзначное число, необходимо вывести на экpан 2 числа из которых оно состоит(в программе паскаль)

Даётся одно любое двухзначное число, необходимо вывести на экpан 2 числа из которых оно состоит

(в программе паскаль)