Определить количество полных метров и остаток в сантиметрах - Pascal
Формулировка задачи:
Расстояние L задано в сантиметрах. Определить количество полных метров в нем и остаток в сантиметрах
Решение задачи: «Определить количество полных метров и остаток в сантиметрах»
textual
Листинг программы
var l,m,cm:integer;
begin
read(l);
m:=l div 100;
cm:=l mod 100;
writeln('Количество полных метров - ',m);
writeln('Остаток в сантиметрах - ',cm);
end.
Объяснение кода листинга программы
- Создаются переменные:
l(длина в сантиметрах),m(количество полных метров),cm(остаток в сантиметрах).
- Считывается значение в переменную
l. - Вычисляется количество полных метров:
- значение переменной
mприсваивается результат целочисленного деления значения переменнойlна 100.
- значение переменной
- Вычисляется остаток в сантиметрах:
- значение переменной
cmприсваивается остаток от деления значения переменнойlна 100.
- значение переменной
- Выводится результат:
- выводится фраза
Количество полных метров -и значение переменнойm, - выводится фраза
Остаток в сантиметрах -и значение переменнойcm.
- выводится фраза