Вкус хлеба лишнее, так как всё остальное - это звуки.
Логические данные- это одно из двух значений( истина или ложь).
program While2;
uses PT4;
function Iter(a, b: real): integer;
begin
Result := 0;
repeat
Result += 1;
a -= b
until a < b
end;
begin
Task('While2');
var (A, B) := ReadReal2();
Write(Iter(A, B))
end.
Ответ:
3,частично 1
Объяснение:
Ибо структура у всех записей одна и та же