Задача Паскаль: Дано 3-х значное число 121, разбить его на три числа 1,2,1

Question

Информатика

Лукан

9 октября, 23:29

Задача Паскаль: Дано 3-х значное число 121, разбить его на три числа 1,2,1

+5

Ответы (1)

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

Фиста · Answer 1

var s, l, o, k : integer;

begin

writeln ('3-x значное число') ;

readln (s) ;

k:=s div 100;

s:=s mod 100;

l:=s div 10;

o:=s mod 10;

writeln (k,',', l,',', o) ;

end.