using system;
using system.collections.generic;
using system.linq;
using system.text;
namespace consoleapplication1
{
class program
{
static void main(string[] args)
{
//задана последовательность из n вещественных чисел. определить сколько среди них меньших k, больших k, равных k.
console.writeline("введи k");
double k = double.parse(console.;
console.writeline("введи n");
double n = double.parse(console.;
console.writeline("введи числа");
double a = 0.0, n_min = 0.0, n_rav = 0.0, n_max = 0.0;
for (int i = 0; i < n; i++)
{
a = double.parse(console.;
if (a < k)
n_min++;
else
{
if (a == k)
n_rav++;
else
n_max++;
}
}
console.writeline("меньших k - " + n_min + ", равных - " + n_rav + ", больших - " + n_max);
console.readkey();
}
}
}
Поделитесь своими знаниями, ответьте на вопрос:
Номер 1 напечатать сумму элементов кратных одновременно двум или трем числового ряда 3, 6, 9, 2, 12, 2, 24 и 2 составить программу вычисления числового ряда для известного числа ряда n. y=(1-2/5)+(2+4/10)+(3-8/15)+(4+16/20)+
program zadacha2;
uses crt;
var i,n,a: integer;
b,y,c,l: real;
begin
clrscr;
readln(n);
a: =1;
b: =2;
c: =5;
for i: =1 to n do
begin
if a mod 2 = 0 then
l: =a+b/c
else
l: =a-b/c;
a: =a+1;
b: =b+2;
c: =c+5;
y: =y+l;
end;
writeln(y: 2: 2);
readkey;
end.
первую по подробней расспишите