Нужно заполнить массив нечетными натуральными числами. размерность n вводится с клавиатуры. элементы массива вывести на экран в строку через пробел, перед элементом напечатать его номер и знак-разделитель «: ». выполнить на языке pascal

var a:array of integer;

i,n:integer;

begin

write('Введите количество элементов массива: ');

read (n);

a:=new integer[n];

for i:=0 to n-1 do

begin

a[i]:=random(100);

if a[i] mod 2 = 0 then a[i]:=a[i]+1

end;

for i:=0 to n-1 do write (i,':',a[i],'   ')

end.

program massiv;

var b, i, g:integer;

a:real;

n: array [1..1000] of integer;

begin

write('Введите количество элементов в массиве: ');

readln(b);

writeln('Введите элементы массива: ');

for i:=1 to b do

read(n[i]);

write('Вывод элементов массива: ');

for i:=1 to b do

begin

if n[i] mod 2 = 0 then write

else

write(n[i],':',i,' ');

end;

end.

program yourname;
uses crt;
var com:string; i:integer;
begin
writeln('Задайте значените программы.');
writeln('Для того чтобы программа посчитала от 1 до 5 пропишите команду  "go1".');
writeln('Для того чтобы программа посчитала от 5 до 1 пропишите команду  "go2".');
writeln('Для того чтобы сказать программе - пропишите команду "go3".');
readln(com);
If (com = 'go1') then begin
writeln(Программа считает от 1 до 5');
for i:=1 to 5 do writeln(i) end
else if (com = 'go2') then begin
writeln('Программа считает от 5 до 1');
for i:=5 downto 1 do writeln(i) end
else if (com = 'go3') then begin
writeln('Программа: Всегда рада вам
else begin writeln('Данной команды не существует либо вы ввели команду вместе с ковычками.');
Перезапустите программу.') end

 

end.

Информáтика (фр. Informatique; англ. Computer science) — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений[1].

Информатика включает дисциплины, относящиеся к обработке информации в вычислительных машинах и вычислительных сетях: как абстрактные, вроде анализа алгоритмов, так и конкретные, например разработка языков программирования и протоколов передачи данных.

Темами исследований в информатике являются вопросы: что можно, а что нельзя реализовать в программах и базах данных (теория вычислимости и искусственный интеллект), каким образом можно решать специфические вычислительные и информационные задачи с максимальной эффективностью (теория сложности вычислений), в каком виде следует хранить и восстанавливать информацию специфического вида (структуры и базы данных), как программы и люди должны взаимодействовать друг с другом (пользовательский интерфейс и языки программирования и представление знаний) и т. п.