В 1832г - <em>изобрели электрический телеграф</em>
В 1837г - <em>создан электромагнитный телеграфный аппарат</em>
В 1876г - <em>изобретен телефон</em>
В 1895г - <em>создали радио</em>
20 век - <em>телевидение, спутниковая связь</em>
Это текстовой файл. Программа Writer из Open/Libre office.
Аня - туристка, Боря - художник, Гриша - футболист, Дина - певица, Вася - танцор
1)
var
mas: array [1..5] of integer;
i:integer;
begin
for i:=1 to 5 do
read(mas[i]);
for i:=1 to 5 do begin
mas[i]:=mas[i]-20;
write(mas[i],' ');
end;
end.
2)
var
mas: array [1..8] of real;
i:integer;
begin
for i:=1 to 8 do
read(mas[i]);
for i:=1 to 8 do begin
if i mod 2 = 0 then
write(mas[i]-1,' ')
else
write(mas[i]+1,' ')
end;
end.
К компьютеру,тк компьютеры не воспринимают вай-фай сигнал