1. Динамический массив
program p_1;
var n,i,k:integer;
a:array of integer;
begin
write('Введите количество элементов массива ');
readln (n);
a := new integer[n+1];
for i:=1 to n do
begin
write('Введите ',i,' элемент массива ');
readln (a[i])
end;
k:=0;
for i:=1 to n do
if a[i] = 0 then k:=k+1;
writeln;
writeln('k = ',k)
end.
2. Статический массив
program p_1;
var n,i,k:integer;
a:array [1..1000] of integer;
begin
write('Введите количество элементов массива ');
readln (n);
for i:=1 to n do
begin
write('Введите ',i,' элемент массива ');
readln (a[i])
end;
k:=0;
for i:=1 to n do
if a[i] = 0 then k:=k+1;
writeln;
writeln('k = ',k)
end.
Информационная служба FTP - это протокол передачи файлов по сети, является одним из старейших прикладных протоколов, появившихся задолго до HTTP, и даже до TCP/IP, в 1971 году; в первое время он работал поверх протокола NCP. Он и сегодня широко используется для распространения ПО и доступа к удалённым хостам. В отличие от TFTP, гарантирует передачу (либо выдачу ошибки) за счёт применения квитируемого протокола.
Информационная служба FTP используется для передачи файлов, хранения набора файлов самого разнообразного назначения (обычно в архивированном виде)
Форум, Доска Объявлений, Разные социальные сети, разные сайты
Объяснение:
