Дано двузначное число.Вывести вначале его левую цифру(десятки),а затем-его правую цифру(единицы). Для нахождения десятков использовать операцию деления нацело,для нахождения единиц-операцию взятия остатка от деления — Pascal(Паскаль)

program z1;
var
 k,n,m:integer;
begin
 repeat
  writeln('vvedie chislo ot 10 do 99');
  readln(k);
 until k in [10..99];
 n:=k div 10;
 m:=k mod 10;
 writeln(n,' ',m);
end.

Похожие записи/страницы:

Leave a Comment

60 − = 53