Ответ:
5-команда ввода-read, команда вывода- write
6-функция random
7-Var i : Integer; {i - это переменная для работы с элементами массива}
Begin
For i:=1 To n Do {ввод массива с клавиатуры}
Read(m[i]); {чтение i-го элемента}
End;
8-var f: array[1..10] of integer;
i:integer;
begin
randomize;
for i:=1 to 10 do
begin
f[i]:=random(10); { интервал [0,9] }
write(f[i],' ');
end;
end.
9-не понял
Объяснение:
program dva_chisla;
var
a,b,s,p,v:real;
Begin
Writeln('Введите два числа');
Readln(a,b);
s:=a+b;
writeln('Сумма чисел ',a,' + ',b,' = ',s);
v:=a-b;
writeln('Разность чисел ',a,' - ',b,' = ',v);
p:=a*b;
writeln('Произведения чисел ',a,' * ',b,' = ',p);
End.
Тут просто, смотри, цифра 1 означает 2, 2-4, 3-8, 4-16, 5-32 (Число каждый раз увеличивается в 2 раза).Теперь всё складываем, и получаем 0+4+8+64=72. У 8-9 классов похожие задачи есть
Var a,b,c,d,e:integer;
begin
read(a,b,c,d,e);
write(a+b+c+d+e);
end.