Program primer;
Uses crt;
var i,n: integer;
a:array[1..100] of integer;
begin clrscr;
randomize;
write('Pazmer massiva = ');
readln(n);
for i:=1 to n do
a[i]:= random(100)-50;
for i:=1 to n do
write(a[i]:5);
writeln;
writeln;
for i:=n downto 1 do
write(a[i]:5);
readln;
end.
А)Друзей, грибы
Б)Анкету, ведро
В)Магазин, книгу
Г)Факты, верёвки
Д)Логику, свет
Е)Числа, рубашку
Ж)Горе, объём
З)Удачу, зайца
1)Т.к 1 мб=8000000 битов, тогда 8000000*136=1088000000 битов.
2)Т.к 1 тб=1000000000 КБ, тогда 1000000000*2=2000000000 кб.
3),4) немного не поняла, напиши я дорешаю.
5)Дано : | Решение.
V=12 кбит/с. | 1)Переведем 6 минут в сек. :
t=6 мин. | 6*60=360(сек)
_________ | 2)12*360=4320(кб).
S=?
Ответ :4320 килобайт.
Подробнее - на Znanija.com - znanija.com/task/30179393#readmore
Var a:string;
i:Integer;
begin
read(a);
for i:=Length(a) downto 1 do
write(a[i]);
end.
полегче надо
Ответ:
1
Объяснение:
Остальное неверно. Некоторое неверно в принципе, некоторое может быть верным в частных случаях. Например, если текст планируется распознавать, разрешение должно быть максимально возможным. Если текст местами загрязнен, сканировать надо в цвете - так будет проще потом убрать лишнее.