S = √(p·(p - a)·(p - b)·(p - c))
(Все выражение после «=» находится под корнем)
V=524288 бит/с
t=4 мин=4*60 с
I=v*t=524288*4*60 бит=524288*4*60/(8*1024*1024) Мбайт=15Мбайт
Ответ: 15 Мбайт
Var d:array[1..10] of integer;
s,i:integer;
Begin
s:=1;
For i:=1 to 10 do
begin
readln(d[i]);
If d[i]<>0
Then S:=S*d[i];
end;
Writeln(S);
end.
Var
i,s:integer;
a:array[1..15] of integer;
begin
randomize;
for i:=1 to 15 do
begin a[i]:=random(21);
write(a[i],' ');
if a[i]<=10 then s:=s+a[i]
end;
writeln('Сумма ',s)
<span>end.</span>
Имеют единый графический интерфейс пользователя Windows 95;поддерживают многозадачные и многопоточные вычисления;имеют встроенную поддержку мультимедиа.поддерживают различные аппаратные платформы: Intel-совместимые, на основе RISC-процессоров и на базе процессоров PowerPC;поддерживают файловую систему FAT