Напишите письмо другу о том как прочитать данные из файла Опишите особенности чтение из файла и его значение в программировании С какими трудностями вы столкнулись при изучении этой темы Расскажите о том какие новые возможности в программировании можно получить если успешно освоить эту тему
Оптический телеграф Оптический телеграф В 1792 году во Франции Клод Шапп создал систему передачи визуальной информации, которая получила название «Оптический телеграф» . В простейшем виде это была цепь типовых строений, с расположенными на кровле шестами с подвижными поперечинами, которая создавалась в пределах видимости одно от другого. Шесты с подвижными поперечинами — семафоры — управлялись при тросов специальными операторами изнутри строений. Шапп создал специальную таблицу кодов, где каждой букве алфавита соответствовала определенная фигура, образуемая семафором, в зависимости от положений поперечных брусьев относительно опорного шеста. Система Шаппа позволяла передавать сообщения на скорости два слова в минуту и быстро распространилась в Европе. В Швеции цепь станций оптического телеграфа действовала до 1880 года
Объяснение:
Pascal
program pr;
var
i, n, k, cout: integer;
a, b: array [1..100] of integer;
begin
cout := 0;
k := 1;
writeln('Введите размер массива');
readln(n);
if (n>0) and (n<=10000) then
begin
for i := 1 to n do
begin
read(a[i]);
end;
writeln;
for i := 1 to n do
if a[i] < 0 then
begin
cout := cout + 1;
b[k] := a[i];
k := k + 1;
end;
if cout = 0 then
writeln(0) else
for k := 1 to cout do
write(b[k]:3);
end
else writeln('Не корректный ввод n');
end.