Одномерный массив 1. Составьте программу ввода и вывода массива: 5, -2, 3, -6, 7, 9, -4, 8, 1, 2, 7, -3. 2. Составьте блок-схем
ТарасоваКсю
3)
const n=10;
var a:array [1..n] of integer; r,i:integer;
begin
r:=1;
for i:=1 to n do begin
a[i]:=r; inc(r,2); end;
for i:=1 to n do
write(a[i],' ');
end.
Начнём!
1 любой символ хоть пробел, хоть тире, хоть точка...не важно всегда равен 1 байт.
1 килобай(в вашем случае) всегда равен = 1024 байт!
=>1024x3.4=3481,6
Program z1; Var i,n,a,b,c:integer; m: array [1..1000] of integer;Begin write('Введите кол-во чисел - '); readln(n); randomize; a:=0; b:=0; c:=0; for i:=1 to n do begin m[i]:=random(100)-50; write (m[i],' '); end; for i:=1 to n do if (m[i]=0) then a:=a+1; for i:=1 to n do if (m[i]>0) then b:=b+1; for i:=1 to n do if (m[i]<0) then c:=c+1; writeln; writeln ('Кол-во нулей - ',a); writeln ('Кол-во положительных чисел - ',b); writeln ('Кол-во отрицательных чисел - ',c);<span>End.</span>
Ответ:
≈1,3с
Объяснение:
V<em>передачи</em> = 9200 бит/с = 1150 байт/с
t<em>передачи</em> = 1500байт : 1150 байт/с = 30/23 ≈ 1,3с
Ответ:
Я думаю дядей будет, наверное.