Question

Определить результат работы фрагмента: z:=2*99; a:=z-2; if z<150 then z:=2*a else a:=3*z; write (a,z);

Answer 1

Ответ:

588196

Объяснение:

2*99=198

198-2=196

196<150 это неверно, значит a:=3*196=594

у write между числами пробела нет, поэтому они напишутся слитно

и вот сама прога

var

a,b,z:integer;

begin

z:=2*99;  

a:=z-2;  

if z<150 then z:=2*a else a:=3*z;  

write (a,z);

end.