Program gt;
var a:array[1..1000]of integer;
i,n,s:integer;
begin
read(n);
for i:=1 to n do
begin
a[i]:=i;
write(a[i],' ');
end;
writeln;
s:=((1+n)*n)div 2;
writeln(s);
end.
2)
program gt;
var a:array[1..1000]of integer;
i,n,s:integer;
begin
read(n);
s:=0;
for i:=n downto 1 do
begin
a[i]:=i;
write(a[i],' ');
if(i mod 3=0)then s:=s+1;
end;
writeln;
writeln(s);
end.
3)
непонятно условие
там что за n2?
Дюйм- 2,54 см
10/2,54 = 3,9. Значит изображение 3,9 * 3,9 дюйм
Способность сканера 1200 dpi (а не 1200*1200)
3,9 * 1200 = 4680 пикселей
Получается изображение 4680*4680 = 21902400 пикселей
21902400 *24/8 = 65707200 байт = 62,66 Мб
1. 14400 бит*5 секунд = 72000 бит
2. 72000 бит = 9000 байт.
3. 1 символ текста в ASCII = 1 байт, т.е. 9000 байт = 9000 символов текста.
В постоянной:сведения о компьютере,BIOS