Напишу только циклы, потому что
1) много заданий.
2) различия только в циклах
1. Создаешь переменную b:array[1..20] of real;
...
for i:=1 to 20 do
b[i]:= sqrt(a[i]);
...
2. Создаешь переменную sum: integer;
...
sum:=0;
for i:=11 to 15 do
sum:=sum+a[i];
...
3. Здесь без дополнительных переменных.
...
for i:=1 to 20 do
if a[i] mod 8 = 0 then
writeln('A[',i,'] = ',a[i]);
...
4. Создаешь переменную sum:integer:
...
sum:=0;
for i:= 1 to 20 do
if a[i] > 0 then sum:=sum+a[i];
sum:=sum*2;
...
5. Здесь без дополнительных переменных.
...
for i:= 2 to 20 do
if a[i] > a[i-1] then
writeln('A[',i,']');
...
6. Создаешь переменную k:integer;
...
k:=0;
for i:=1 to 19 do
if a[i] and a[i+1] > 0 or a[i] and a[i+1] < 0 then
k:=k+1;
if k>0 then writeln('Да'); else writeln('Нет');
...
7. Аналогично, переменная k:integer;
...
k:=0;
for i:=1 to 20 do
if a[i] > 0 then k:=k+1;
writeln(k,' элементов больше 0');
...
8. Без дополнительных переменных
...
for i:=1 to 20 do
if a[i]>0 then
a[i]:=a[i]-a[2];
else
a[i]:=a[i]+a[4];
for i:= 1 to 20 do
write(a[i]:4);
...
9. Переменную k:integer;
...
k:=1;
for i:=1 to 19 do
if a[i] mod 3 > 0 or a[i] mod 5 > 0 then
k:=k+1;
else a[k]:=a[i+1];
...
(Могу ошибаться, я пересмотрю это задание)
В номере 1-ответ 3
В номере 2-ответ 4
В номере 3-ответ 1
Удачи))
Var x,y: real;
begin
write(' x = '); readln(x);
if x<0 then y:=sqr(x)*x+2
else y:=sqrt(x);
writeln(' y = ',y:6:4);
end.
<span>
</span>
Ответ:
отключи плей маркет в принципе, скачай установи и включи
1.Устройство компьютера 1) Питание 2) Процессор 3) Видеокарта 4) Память 5) Материнская плата 6) Винчестер 7) Корпус 8) Дисковод
2)
1. Питание- Вторичный источник электропитания, предназначенный для снабжения узлов компьютера электроэнергией постоянного тока путём преобразования сетевого напряжения до требуемых значений.
2. Процессор- это основной элемент компьютера, с помощью которого обрабатывается информация, находящийся как в свободной памяти, так и в памяти других устройств.
3. Видеокарта- это устройство которое хранит содержимое памяти компьютера.
4. Память- это часть вычислительной машины, или среда для хранения данных компьютера.
5. Материнская плата- это печатная плата,являющаяся основой построения модульного устройства.
6.Винчестер- это жёсткий диск, который является основным накопителем данных в большинстве компьютерах
7. Корпус- это системный блок, наполненный аппаратами обеспечения для создания компьютера.
8. Дисковод- Устройство компьютера,позволяющее осуществить чтение и запись информации на съёмном диске.