В России построена первая телеграфная линия - 40-е гг. 19 века.
В Америке изобретён телефон - 1876 г
Русский ученый Попов открыл радиосвязь - 1895 г.
Создан первый телевизор - 30-е гг. 20 века
В США начала функционировать первая в мире компьютерная - 1969 г.
Устройства ввода и вывода данных Устройства ввода и вывода - устройства взаимодействия компьютера с внешним миром: с пользователями или другими компьютерами. Устройства ввода позволяют вводить информацию в компьютер для дальнейшего хранения и обработки, а устройства вывода - получать информацию из компьютера.
Не за что)
Var a,b:integer;
begin;
b:=1;
a:=1;
while a<>0 do
begin;
readln(a);
if a=0 then break;
b:=b*a;
end;
writeln(b);
<span>end.</span>
Вот TURBO PASCAL
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
<span>uses crt;
var i,sum,tmax,tmin:integer;sred:real;
t:array [1..30] of integer;
begin
clrscr;
sum:=0;
writeln('vvedite T -> ');
for i:=1 to 6 do begin
write(i,' zamer t = ');
read(t[i]);
end;
tmax:=t[1];
tmin:=t[1];
for i:=2 to 6 do begin
if t[i]>tmax then
tmax:=t[i];
if t[i]<tmin then
tmin:=t[i];
end;
for i:=1 to 6 do
sum:=sum+t[i];
sred:=sum/6;
writeln('Max T = ',tmax);
writeln('Min T = ',tmin);
writeln('srednyaya T = ',sred:3:3);
readkey;
<span>end</span></span>
Вот например:
1011100010111000