Какова масса последнего солдатика? - Free Pascal

Узнай цену своей работы

Формулировка задачи:

Было когда-то на свете 25 оловянных солдатиков, которых сделали из старой оловянной ложки массой 123 г. 24 солдатика были одинаковыми: друг от друга не отличались. Но двадцать пятый солдатик был не такой, как все. Он оказался одноногим. Его отливали последним, и олова немного не хватило. Какова масса последнего солдатика?

Решение задачи: «Какова масса последнего солдатика?»

textual
Листинг программы
var m:integer;
begin
m:=123 mod 25;
write('Масса последнего солдатика=',m);
readln
end.

Объяснение кода листинга программы

В данном коде:

  1. Объявлена переменная m типа integer (целое число).
  2. В строке m:=123 mod 25; вычисляется остаток от деления числа 123 на 25 и присваивается переменной m.
  3. В строке write('Масса последнего солдатика=',m); выводится на экран сообщение Масса последнего солдатика= и значение переменной m.
  4. В строке readln; происходит чтение строки из стандартного ввода (клавиатуры).

Оцени полезность:

12   голосов , оценка 3.833 из 5
Похожие ответы