Программа для перевода сантиметров в метры с помощью div и mod (Паскаль).Заранее спасибо!
Answers & Comments
zarembo73
Var a,b,c:integer; Begin writeln('Введите длину в сантиметрах'); readln(a); b:=a div 100; c:=a mod 100; writeln(a,' см = ', b, ',', c, ' м'); End.
Answers & Comments
Begin writeln('Введите длину в сантиметрах');
readln(a);
b:=a div 100;
c:=a mod 100;
writeln(a,' см = ', b, ',', c, ' м');
End.
Результат выполнения см. на рисунке