Як називається вказаний тип списку? VII. Король Магнум XLIV
IX. Король Зигфрид XVI
х. Король Сигизмунд ХХІ
XI. Король Хусбрандт I

Question

Информатика: Як називається вказаний тип списку? VII. Король Магнум XLIV IX. Король Зигфрид XVI х. Король Сигизмунд ХХІ XI. Король Хусбрандт I

ghostridermen · Answer

program raf105;

var

white,blue,red,x,y,z: integer;

w,b,r: boolean;

begin

writeln('Ввод:');

readln(white, blue, red, x, y, z);

repeat

w:= false;

b:= false;

r:= false;

if white >= x

then begin

white-= x;

blue+= 1;

end

else w:= true;

if blue >= y

then begin

blue-= y;

red+= 1;

end

else b:= true;

if red >= z

then begin

red-= z;

white+= 1;

end

else r:= true;

until w and b and r;

writeln('Вывод:');

writeln(white,' ', blue,' ', red);

end.

PascalABC 3.4.2