если си значит с printf'ами
Объяснение:
#include "stdio.h"
#include "stdlib.h"
#include "math.h"
int main()
{
int N = 10;
float a[N];
for(int i = 0; i < N; i ++)
{
a[i] = (float)rand() - RAND_MAX/2;//заполняем случайными числами
printf("%.0f\n", a[i]);//и сразу выводим
}
//поиск максимумального модуля
float max_abs = abs(a[0]); //сперва установим максимумом первый эл-т
for(int i = 1; i < N; i ++)
{
if(abs(a[i]) > max_abs)
max_abs = abs(a[i]);
}
printf("max abs = %.0f", max_abs);
}
// Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=ReadReal2('Введите через пробел a,b:');
Writeln(a,' + ',b,' = ',a+b);
Writeln(a,' - ',b,' = ',a-b);
Writeln(a,' * ',b,' = ',a*b);
end.
Пример
Введите через пробел a,b: -3.6 2.15
-3.6 + 2.15 = -1.45
-3.6 - 2.15 = -5.75
-3.6 * 2.15 = -7.74
begin
var n:=ReadInteger('n=');
var a:=ReadReal('a=');
var p:=1/a;
var s:=p;
for var i:=1 to n do begin p/=(a+i); s+=p end;
Writeln(s)
end.
Пример
n= 6
a= 2.4
0.57315329840095
begin
var n:=ReadInteger('n=');
var s:=ReadSeqReal('Введите '+n+' чисел:',n).Select(x->Abs(x)).Sum;
Writeln('Сумма модулей равна ',s)
end.
Пример
n= 6
Введите 6 чисел: -4.35 2.63 11 -8.1 0 -6.4
Сумма модулей равна 32.48