Задача Паскаль: Дано 3-х значное число 121,разбить его на три числа 1,2,1
Задача Паскаль: Дано 3-х значное число 121,разбить его на три числа 1,2,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.
Не нашли ответ?
Похожие вопросы