N=64
l=120*2560=307200 символов
64=2^i
i=6 бит
V<em /><u>i=307200*6/8/1024=225 КБайт
</u>Ответ: 225 КБайт
Ответ:
вот ссылка как всё делать
http://pedsovet.su/excel/5883_grafik_funkcii
Объяснение:
1) for i:=20 to 35 writeln(i);
2) read(b);
for i:=10 to b writeln(i*i);
3) for i:=1 to 10 write(20,',');
1)b=1 a=2
b=2 a=4
b=3 a=7
b=4 a=11
b=5 a=16
2)1)a=1 b=0
2)пока b не равно 5
3)b+=1, a+=b или b=b+1, a=a+b
4)если b=5 конец цикла 2
5)вывод a,b
3)-3
Var s: String;
k, kol: Integer;
Begin
kol := 0;
readln(s);
while pos(' ',s) <> 0 do
begin
k := pos(' ',s);
if k <> 0 then
if k = 4 then begin
kol := kol + 1;
delete(s,1,4);
end else
delete(s,1,k);
end;
if length(s) = 3 then begin
kol := kol + 1;
delete(s,1,3);
end;
writeln(kol);
End.