Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
12 ячеек
Создал бы сам Excel таблицу и проверил
используется язык pascal
program pr;
var
mas: array[1..7] of integer;
i: integer;
begin
writeln('вводим значения в массив');
for i: =1 to 7 do readln (mas[i]);
writeln('выводим значения из массива');
for i: =7 downto 1 do writeln(mas[i]);
readln;
end;
a: array[1..5]of integer;
for i: =1 to 5 do read(a[i]);
for i: =1 to 5 do write(a[i],' ');
writeln;
for i: =1 to 5 do if a[i]> =1024 then writeln(a[i] div 1024);
end.
Популярные вопросы