128 128 128 128 128 128 128
Const
N = 15;
Var
A:array[1..N] of integer;
i,k:integer;
Begin
Randomize;
Write('Исходный массив:');
k:=0;
For i:= 1 to N do
Begin
A[i]:=random(21)-10;
Write(' ',A[i]);
if A[i] > A[1] then k:=k+1;
End;
WriteLn;
WriteLn('k = ',k);
End.
#include <iostream>
int main(){
int height, above140 = 0, middle = 0;
const int num = 20;
for (int i = 0; i < num; i ++){
std::cout << "height is ";
std::cin >> height;
middle += height;
if (height > 140) above140 ++;
}
middle /= num;
std::cout << "middle height is " << middle << "\nabove 1m 40sm is " <<
above140 << "\n";
}
Ввести число А
ввести число В
ввести число С
вычислить Д=А*В*С
вывести на экран Д
конец