Срочно! Що виконує даний код: k :=0; for i := 1 to 10 do if a[i] = x then k := k 1; А) Знаходження суми…

Срочно! Допоможіть із завданням!

Встановіть відповідність між операторами (1-4) та їх призваченням (A-Г).

1.For i := 1 to 10 do If A [i]
2.K := 0; For i: = 1 to 10 do If A[i] <0 Then K:=K+ 1

3.For i := 1 to 10 do If A[i]<0 Then ListBoxl.Items. Add (IntToSti(A [j])

4.For i := 1 to 10 do IF A [i]< 0 Then A [i]:= 0

А) Заміна нулями відʼємних елементів масиву

Б) Знаходження суми відʼємних елементів

масиву

В) Виведення відʼємних елементів масиву у поле списку ListBox1

Г) визначення кількості відʼємних елементів масиву

2. Визначити чому буде дорівнювати значення

змінної к після виконання наступного

фрагменту коду.написать объяснения как получили ответ:

int a = 5;

int k = 0;

int x = 0;

do

{

a = a — 1;

k += a;

} while (a > x );

ПОМОГИТЕ ПРОШУ. ДАМ МАКСИМАЛЬНОЕ КОЛ-ВО БАЛЛОВ
1. Задан массив X[1.N]. Какой оператор надо поставить вместо многоточия, чтобы найти в переменной S сумму всех элементов массива? Вводите ответ без пробелов.

S:= 0;

for k:=1 to N do begin

.

end;

Ответ:

введите строку

2. Задан массив X[1.N]. Какое условие надо поставить вместо многоточия, чтобы найти в переменной S сумму положительных элементов массива? Вводите ответ без пробелов.

S:= 0;

for k:=1 to N do begin

if . then

S:= S + X[k]

end;

Ответ:

введите строку

3. Задан массив X[1.N]. Какое условие надо поставить вместо многоточия, чтобы найти в переменной S сумму элементов массива, которые делятся на 5? Вводите ответ без лишних пробелов.

S:= 0;

for k:=1 to N do begin

if . then

S:= S + X[k]

end;

Ответ:

введите строку

4. Задан массив X[1.N]. Какое условие надо поставить вместо многоточия, чтобы найти в переменной S сумму элементов массива, десятичная запись которых заканчивается на 4? Вводите ответ без лишних пробелов.

S:= 0;

for k:=1 to N do begin

if . then

S:= S + X[k]

end;

Ответ:

введите строку

5. Задан массив X[1.N]. Какое условие надо поставить вместо многоточия, чтобы найти в переменной S количество чётных элементов массива? Вводите ответ без лишних пробелов.

S:= 0;

for k:=1 to N do begin

if . then

S:= S + 1

end;

Ответ:

введите строку

6. Задан массив X[1.N]. Какое условие надо поставить вместо многоточия, чтобы найти в переменной S количество элементов массива, делящихся на 3? Вводите ответ без пробелов.

S:= 0;

for k:=1 to N do begin

if . then

S:= S + 1

end;

Ответ:

введите строку

7. Задан массив X[1.N]. Какое условие надо поставить вместо многоточия, чтобы найти в переменной S количество элементов массива, десятичная запись которых оканчивается на 6? Вводите ответ без лишних пробелов.

S:= 0;

for k:=1 to N do begin

if . then

S:= S + 1

end;

Ответ:

введите строку

8. Задан массив X[1.N]. Какое условие надо поставить вместо многоточия, чтобы найти минимальный элемент массива в переменной M? Вводите ответ без пробелов.

M:= X[1];

for k:=2 to N do begin

if . then

M:= X[k]

end;

Ответ:

введите строку

9. Задан массив X[1.N]. Какой оператор надо поставить вместо многоточия, чтобы найти номер максимального элемента массива в переменной M? Вводите ответ без пробелов.

M:= 1;

for k:=2 to N do begin

if X[k] > X[M] then

.

end;

СРОЧНО!

Введіть пропущений символ з

клавіатури.

Наведено фрагмент програми для пошуку елемента табличної величини з найбільшим значенням. У фрагменті пропущено символ на місці знаку питання.

мах:= a[?];

for i:=2 to 10 do

if a[i] > max then max:= a[i];-

!СРОЧНО!
Дан одномерный масив из 5 элементов. Масив заполнен случайными числами от -10 до 10. Вывести на экран массив и сумму 2 и 3-го элементов​

100 БАЛІВ ! СРОЧНОО! (Відтворити у ПАЙТОНІ)

Розглянемо 2 ситуації: двоє учнів тримають по важкій книзі (потрібно тримати обома руками). Вони хочуть помінятись книгами. Як їм слід вчинити? Або маємо у різних склянках різні соки. Потрібно поміняти місцями вміст двох склянок. Як це

можна зробити?

В обох випадках нам потрібно скористатись додатковим тимчасовим місцем для збереження. У ньому розміщуємо вміст першого об’єкта, тоді перший бере вміст другого, а другий — забирає те, що лежало в тимчасовому сховку. Для того, щоб поміняти місцями вміст двох змінних — потрібна третя.

Задача 1. Поміняти місцями вміст двох змінних

a=int(input(‘Введіть перше число ‘))

b=int(input(‘Введіть друге число ‘))

c=a

a=b

b=c

print(‘A=’,a)

print(‘B=’,b)

Задача 2. Перерозподілити вміст двох змінних так, щоб у змінній А містилось менше з двох чисел, а у змінній В — більше.

a=int(input(‘Введіть перше число ‘))

b=int(input(‘Введіть друге число ‘))

if (a>b): c=a

a=b

b=c

print(‘A=’,a)

print(‘B=’,b)

Задача 3. Записати у змінну А найменше з трьох чисел, у змінну В — середнє, у змінну С — найбільше з трьох чисел.

a=int(input(‘Введіть перше число ‘))

b=int(input(‘Введіть друге число ‘))

c=int(input(‘Введіть третє число ‘))

if (b>c):

x=b b=c c=x

if (a>b): x=a

a=b

b=x if (b>c):

x=b b=c c=x

print(‘A=’,a)

print(‘B=’,b)

print(‘C=’,c)

Помогите решить.

1. В результате выполнения следующих операторов:

a:=3;

b:=4;

x:=sqrt(sqr(a) +sqr(b);

Write(‘ x= ‘ ,x, ‘ a+b=7 ‘);

Writeln(a, b,’a’, ‘b’);

Будет напечатано:

Д) x= 5true 34ab

E) x= 5 a+b=7 34ab

Ж) x=sqrt(sqr(a) +sqr(b)), a+b=7 34ab

З) x= 5.00000000000000E+0000 true 34ab

2. Определите значение целочисленной переменной a после выполнения фрагмента алгоритма:

a:=247;

b:=(a div 100)*10+9;

a:=(10*b-a) mod 10;

3. Укажите значение для переменных x и y после выполнения операторов:

x:=2;

y:=5;

x:=y;

y:=x;

4. Какую задачу решает данная программа?

program primer;

car a, b, c : integer;

begin

writeln(‘введите двузначное число’);

readln(a);

b:=a div 10;

c:=a mod 10;

write(c*10+b);

end.

Д) находит сумму цифр числа;

Е) вычисляет целую часть и остаток от деления на 10;

Ж) меняет цифры числа местами;

З) находит цифры числа, а на экран выводит само число.

5. Среди предложенных выражений выберите логические

И) (x=3)or (x<>4)

К) 2*x+5

Л) x mod 2 = 0

М) x div 3

Н) x+y = 10

0) x+y

П) (x+y>5) or (x-y>5)

Р) (x>3) and (x<=10)

Помогите,срочно,прошу

Известно значение трёх чисел.

Определить наибольшее

Примечание: использовать ReadLn и ячейки Y, a, b, c

вид экрана:

Ввести с клавиатуры три

целых числа в ячейки А,В,С:

7 15 9

У = 15

ТЕКСТ:

Program M_1;

Var

y, a, B, C: ? ;

begin

end.

Дано одновимірний масив. Знайти у масиві значення, що повторюються.

C++

Дана программа:

program Test3

Var a,b,c :integer

d,e :integer

x,r :integer

begin

write (`введите коэффициенты`)

readln (a,b,c)

write (`введите значения аргумента`)

readln (x)

d:=a*x*x

e:=b*x [звездочка]

r:=d+e+c

write (`результат=`,r)

end

1.что будет отображено на экране и в памяти компьютера если a=12, b=8, c=2, x=10. помогите пожалуйста)

2. составить блок схему

3. что будет получено, если в операторе отмеченном звездочкой вместо операции умножения использовать операцию деления