Как назовете файл, так он и будет называться. В данном случае имя word_2
Волна:
Волк ' на
Ворона:
Вор + она
Ива:
Иван '
Наташа:
Нота о=а + шар '
Количество символов в статье = 64*40*56
Объем статьи = 64*40*56*16 бит = 64*40*56*16/8 байт = 64*40*56*2 байт =
64*40*56*2/1024 Кбайт = 5*56 Кбайт = 280 Кбайт
Program P;
Var
n, i : Integer;
max, iMax: Integer;
Begin
Write('Enter 10 numbers ');
for i := 1 to 10 do
Begin
Read(n);
if i = 1 then
Begin
max := n;
iMax := i;
End
else
if n > max then
Begin
max := n;
iMax := i;
End;
End;
WriteLn('Max = ', max);
WriteLn('index = ', iMax);
ReadLn;
End.