Имеются две кучки камней, в одной из которых 13 штук, а в другой 17. Исполнитель имеет два допустимых действия: а) взять из первой кучки два камня и переложить их во вторую;б) взять из второй кучки 5 камней и переложить их в первую и умеет проверять, остались ли в кучке камни.Исполнитель выполняет алгоритм:Делать пока (в первой кучке есть камни) и (во второй кучке есть камни){Взять из первой кучки 2 камня и переложить их во вторую;Взять из второй кучки 5 камней и переложить их в первую;}через несколько шагов исполнитель прекратил работу, потому что:1) кончились камни в первой кучке;2) кончились камни во второй кучке; 3) не может исполнить допустимое действие а;4) не может исполнить допустимое действие б.
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Как называется бланк заполнением которого создается структура запроса
Автор: tigran87-87
В двухмерных массивах А[4, 5] и В[4, 5] найти минимальные значения и сравнить их между собой. В Паскале
Автор: Klochkov malakhov1974
Складіть програму обчислення об'єму куба на інформатику
Автор: si0000
Перевести сумму, заданную в копейках(k), в рубли (r)
Автор: warlordkolomna
Напишите программу для решения на любом языке
Автор: expo3217
PascalABC.NET 3.2, сборка 1417 от 28.03.2017
Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('Введите двухзначное число:');
Writeln('Максимальная цифра ',max(n div 10, n mod 10))
end.
2. Школьное решения уровня ТурбоПаскаль 1983г.
var
n,d,e,max:integer;
begin
Write('Введите двухзначное число: ');
Read(n);
d:=n div 10;
e:=n mod 10;
if d>e then max:=d
else max:=e;
Writeln('Максимальная цифра ',max)
end.
3. Пример работы обоих программ (одинаковый)
Введите двухзначное число: 37
Максимальная цифра 7