Определите значение переменной а после выполнения данного алгоритма: а := 10 b := 4 b := 200-а*b а := b/20*а В ответе укажите одно целое число — значение переменной а.

1) B:=200-10*4

2)A:=160/20*10

ответ: A:= 80

Объяснение:

80

Объяснение:

а:= 10

b:= 4

b:= 200-10*4=160

a:= 160/20*10=80

Alt + 1 = ☺    Alt + 2 = ☻    Alt + 3 = ♥

Alt + 4 = ♦    Alt + 5 = ♣    Alt + 6 = ♠

Alt + 7 = •    Alt + 8 = ◘    Alt + 9 = ○

Alt + 10 = ◙    Alt + 11 = ♂    Alt + 12 = ♀

Alt + 13 = ♪    Alt + 14 = ♫    Alt + 15 = ☼

Alt + 16 = ►    Alt + 17 = ◄    Alt + 18 = ↕

Alt + 19 = ‼    Alt + 20 = ¶    Alt + 21 = §

Alt + 22 = ▬    Alt + 23 = ↨    Alt + 24 = ↑

Alt + 25 = ↓    Alt + 26 = →    Alt + 27 = ←

Alt + 28 = ∟    Alt + 29 = ↔    Alt + 30 = ▲

Alt + 31 = ▼    Alt + 177 = ▒    Alt + 987 = █

Alt + 0136 = €    Alt + 0139 = ‹    Alt + 0155 = ›

Alt + 0153 = ™    Alt + 0169 = ©    Alt + 0174 = ®

Alt + 0171 = «    Alt + 0187 = »    Alt + 0177 = ±

Program parabola;

Uses crt,GraphABC;

Const

w=800;

h=600;

x0=400;

y0=300;

k=20;

var i,x1,y1:integer;

x,y:real;

begin SetWindowSIze(w,h);

Line(0,y0,w,y0);

Line(x0,0,x0,h);

TextOut(x0+5,y0+5, '0');

TextOut(w-10,y0+5, 'x');

TextOut(x0+5,10,'y');

i:=k;

while i<w do

begin

Line (i,y0-5,i,y0+5);

i:=i+k;

end;

i:=k;

While i<h do

begin Line(x0-5,i,x0+5,i);

i:=i+k;

end;

x:=-20;

while x<=20 do

begin

y:=x*sin(x);

x1:=Round(x0+k*x);

y1:=Round(y0-k*y);

SetPixel(x0,y1,clblue);

SetPixel(x1,y0,clblue);

SetPixel(x1,y1,clred);

x:=x+0.01;

end;

SaveWindow('Grafic.bmp');

end.