program shet;
uses crt;
var h, d: integer;
begin
writeln('Enter H');
readln(h);
writeln('Enter D');
readln(d);
if (h mod d = 0) then writeln(h div d)
else writeln(h mod d);
end.
Объяснение:
program shet;
uses crt;
var h, d: integer; // создаем переменные
begin
writeln('Enter H');
readln(h); // считываем к клавиатуры h
writeln('Enter D');
readln(d); // считываем с клавиатуры d
if (h mod d = 0) then writeln(h div d) // если h делится на d без остатка печатаем частное от деления
else writeln(h mod d); // иначе печатаем остаток от деления
end.
Модель Земли - карта, создана для удобства работы по изучению частей Земли.
Модель человека - манекен, создан для удобства демонстрации одежды.
Модель человека - скелет (и модели частей организма человека), созданы для исследования организма человека.
Модель города - макет города, создан для грамотного планирования строительства города.