de1979nis
?>

Составить программу подсчёта элементов таблицы больше заданного, тоесть вы должны создать тыблицу из 10 элементов заданых случайным образом. Задачь число из этого и нтервала и подсчитать количество чисел больше данного числа. Вывести произвольное число и подсчитать суммму цифр данного числа

Информатика

Ответы

Panei

1.

import math

b = int(input())

a = 1 / 9 * math.pow(b, 3) - 6.4 * (b + 8) + 3 / 4 * b

print(a)

2.

import math

b = int(input())

a = int(input())

d = 1 / 7 * math.pow(a, 3) * b - 2 * a * pow(b, 2) * (a + b)

print(d)

3.

import math

b = int(input())

a = int(input())

q = 8 * math.pow(a, 3) - 2 * a * b + math.pow(b, 2) / (2 * a * (3 * a - b))

print(q)

4.

import math

x = int(input())

y = int(input())

k = math.pow(x, 3) - 4 * x * y * (x + math.pow(y, 2))

print(k)

5.

import math

v = int(input())

h = abs(v + 1.7) * (2 * v + 3)

print(h)

Объяснение:

Тут во всех примерах будут разные переменные, то есть ответ из примера 1 не идет в переменную a в примере 2

cat2572066

const g = 5; v = 3;

var a: array[1..g,1..v] of integer;

i,j,maxj,minj,p:integer;

begin

writeln('Массив: ');

for i:=1 to g do

begin

for j:=1 to v do

begin

a[i,j]:=Random(101);

write(a[i,j]:4)

end;

writeln

end;

for i:=1 to g do

begin

maxj:=1;

minj:=1;

for j:=1 to v do

begin

if a[i,j]>a[i,maxj] then maxj:=j;

if a[i,j]<a[i,minj]then minj:=j;

end;

p:=a[i,maxj];

a[i,maxj]:=a[i,minj];

a[i,minj]:=p;

end;

writeln;

writeln('Преобразованный массив: ');

for i:=1 to g do

begin

for j:=1 to v do write(a[i,j]:4);

writeln

end;

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Составить программу подсчёта элементов таблицы больше заданного, тоесть вы должны создать тыблицу из 10 элементов заданых случайным образом. Задачь число из этого и нтервала и подсчитать количество чисел больше данного числа. Вывести произвольное число и подсчитать суммму цифр данного числа
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

nurtilekisakov
Kozlovao4
kassel1b
Takhmina-Komarova1415
kettikis
vera4
Дмитрий74
MikhailSvetlana
Panda062000
oshemkov579
timonina29
evgeniipetrosov
k-alexey9
Shalito