Даны два массива чисел а и в по 13 элементов в каждом .найти элементы нового массива с,образованного по правилу c(i)=(ai+bi)*ai^2*sqr bi (на языке q-basic)

ответ

Смотри объяснения ниже:

Объяснение:

1) Устанавливаешь отступы ползунками около листа

2)Вводишь свой текст

3)Нажимаешь на дискету с ручкой в меню, выбираешь нужную папку и сохраняешь под тем же именем

4)закрываешь WORD

5)В проводнике ишешь свою сохранку из пункта 3

6)кликаешь

7)Ентером ставишь абзатцы, как тебе кажется правильным

8)В начале первой строки ставишь ентер, на новой строке пишешь название текста

9)выделяешь заголовок, нажимаешь "главная", там где жирный, курсив, подчёркнутый (разные буквы), выбираешь подчёркивание

10) Нажимаешь на дискету со стрелочками

Первое задание выполнено!

На второе пока нет времени, может, потом добавлю

Прости за неудобства, сам устал

На Паскале:

program prog;

var

   a:array[1..20] of integer = (1,3,2,5,3,2,1,3,5,2,6,3,5,6,2,3,4,5,7,6);

   i,c:integer;

begin

   c:=0;

   for i:=1 to 20 do if a[i]>3 then c:=c+1;

   write('Количество дней с температурой воздуха больше 3 градусов: ', c);

end.

На Питоне:

c = 0

a = [1,3,2,5,3,2,1,3,5,2,6,3,5,6,2,3,4,5,7,6]

for i in a:

   if i > 3: c+=1

print(f'Количество дней с температурой воздуха больше 3 градусов: {c}')

Если нужно вводить температуру с клавиатуры:

На Паскале:

program prog;

var

   a:array[1..20] of integer;

   i,c:integer;

begin

   c:=0;

   for i:=1 to 20 do begin

       write('Введите температуру ', i, '-го дня: '); readln(a[i]);

       if a[i]>3 then c:=c+1;

   end;

   write('Количество дней с температурой воздуха больше 3 градусов: ', c);

end.

На Питоне:

c = 0

a = [int(input(f'Введите температуру {i+1}-го дня: ')) for i in range(20)]

print(a)

for i in a:

   if i > 3: c+=1

print(f'Количество дней с температурой воздуха больше 3 градусов: {c}')