Не относится к системе мгновенного обмена сообщениями : г) Dr.Web
это антивирус
Program UVA;
var a,b,x,y,z:real;
begin
read (a,b);
x:=(a*a)/(b+1);
y:=(a*a*x*x)/b;
z:=sqrt(x+1)+sqrt(2*y);
read (z);
end.
<span>Начало
Положить топор в воду
Закипятить
Посолить
Добавить крупы
Добавить масла
Съесть кашу, а топор оставить, чтобы доварить в следующий раз
Конец.)))</span>
Var sum, i: integer;
begin
i:=-5; sum:=0;
while i<=27 do begin
sum:=sum+i;
i:=i+4;
end;
writeln(sum);
end.
S:=0
For i:=1 to 10
S:=s+2*i
i:=1
S:=o+2*1=2
i:=2
S:=2+2*2=6
i=3
S=6+2*3=12
i=4
S=12+2*4=20
i=5
S=40+2*5=50
i=6
S=50+2*6=62
i=7
S=63+2*7=77
i=8
S=77+2*8=93
i=9
S=93+2*9=111
i=10
S=111+2*10=131
Ответ=131