Регистрация
2006yfcnz
05.07.2021 04:35
Информатика
Есть ответ 👍

Одиннадцатое января Классная работа
Вычисление суммы элементов массива. Последовательность в массиве.
Задание 1.
ответьте на вопрос письменно.
В чем особенность работы представленной ниже программы? Укажите данную особенность, описав
ее подробно.
const a: array [1..5] of integer = (4, 2, 3, 5, 7);
var k: integer;
begin
k = 4;
for i:=1 to 5 do
begin
a[i]:=i+k:
k: =k+2;
end; ;
writeln (k);
writeln (a[i]);
end.
посмотрите решить

222
386
Посмотреть ответы 1

Ответы на вопрос:

polinakuznechov
polinakuznechov
4,5(26 оценок)
Var f: file of integer;       a,i,k,n: integer; begin randomize; assign(f,'file'); rewrite(f); repeat write('четное количество элементов: '); readln(n); until(n> 1)  and  (n mod 2=0); for i: =1 to n do   begin    a: =random(100);     write(f,a);   end; writeln('содержание исходного файла: '); reset(f); while not eof(f) do   begin    read(f,a);   write(a,' ');   end; close(f); writeln; reset(f); seek(f,filesize(f)div 2); truncate(f); writeln('содержание измененного файла: '); reset(f); while not eof(f) do   begin   read(f,a);     write(a,' ');   end; close(f); readln end.

Популярно: Информатика