1.Uses crt;
Var
a:array[10..20] of integer;
i:Integer;
begin
clrscr;
for i:=10 to 20 do
a[i]:=i;
for i:=10 to 20 do
writeln (a[i],',');
End.
2. Var
b:array[2..8] of real;
<span>Скорость передачи данных по локальной сети 37 Mбит в секунду. Ученик скачал игру за 58 минут. Каков объём скачанной информации в Кбайтах? </span>
1) 4096:1024=4кб
4)8×60×30×100=144 000:28 800=5с
5)51 200:16=3200×10=32000 символа
3)512×8=4096×2=8192:1024=8кб
Можно использовать все эти команды:
Найдут тебя опять за дымкою тум<u>ано</u>й -<u />> <span>Найдут тебя опять за дымкою тум<u>анно</u>й
</span>Найдут тебя опять за дымкою тум<u>ан</u>ой -> Найдут тебя опять за дымкою тум<u>анн</u>ой
Найдут тебя опять за дымкою тума<u>ной</u> -> Найдут тебя опять за дымкою тума<u>нной</u>
Найдут тебя опять за дымкою тума<u>но</u>й -> Найдут тебя опять за дымкою тума<u>нно</u>й