Используя подпрограмму (корень из n+ n) решить: (корень из 5 +5/2)+(корень из 3+3/2)+(корень из 7+7/2)

Var   r: real;   function preob(n: integer): real;   begin;   preob: =sqrt(n)+n;   end;   begin   r: =preob(5)/2+preob(3)/2+preob(7)/2;   writeln(r); end.

Program qq;
uses graphABC;
begin
setwindowsize(1200,400);
setpencolor(clblack);
setpenwidth(5);
centerwindow;
//смайлик
circle(600,200,180);
floodfill(600,200,clyellow);
circle(550,100,40);
circle(650,100,40);
floodfill(550,100,clwhite);
floodfill(650,100,clwhite);
line(550,300,650,300);
line(600,250,600,150);
//смайлик
//домик
rectangle(50,350,350,200);
floodfill(200,250,clbrown);
rectangle(125,300,275,225);
floodfill(200,250,clblue);
line(200,255,200,300);
line(125,255,275,255);
line(50,200,200,50);
line(350,200,200,50);
floodfill(200,100,clgreen);
//домик
//кораблик
line(850,250,1150,250);
line(850,250,950,350);
line(1100,350,1150,250);
line(1100,350,950,350);
line(1000,250,1000,50);
line(1000,50,1100,100);
line(1000,150,1100,100);
floodfill(1010,125,clred);
floodfill(1000,300,clorange);
//кораблик
end.

Балаково, Бийск, Варна, Бишкек, Волгоград, Воркута
Ответ: 6

0,25 Кбайт=256 байт=> 0,25 Кбайт> 200 байт
3 байта= 24 бита, т.к 3 байта= 24 бита
2560 битов < 2,5 Кбайта, т.к 2,5 Кбайта= 20000 бит
1000 Кбайт= 1 Мбайт, т.к 1000 Кбайт=1 Мбайт, а 1 Мбайт=1 Мбайт
8192 байта > 8 Кбайт, т.к 8192 байта= 8,192 Кбайта