uses crt;
var a,b,s,p:real;
begin
clrscr;
write('a='); read(a);
write('b='); read(b);
s:=a*b;
p:=2*(a+b);
write('S=',s,' P=',p);
end.
Ответ: а[3] = 2, a[4] =2.
<span>В России: все равно никто ни хрена не делает. </span>
1 МБ = 1024 Кбайт
0,5 МБ = 512 Кбайт
1024 * 15 + 512 = 15872 Кбайт
Ответ: 15872 Кбайт
В номере 3 - c
в номере 4 - b
P.S. мда ну как это можно не знать