var a: array[1..999] of integer;
n, sp, so, kp, ko: integer;
begin
read(n);
for var i := 1 to n do begin
a[i] := random(-9, 9);
write(a[i], ' ');
if a[i] > 0 then begin
sp += a[i];
kp += 1;
end;
if a[i] < 0 then begin
so += a[i];
ko += 1;
end;
end;
writeln;
writeln('Среднее арифметическое положительных чисел = ', sp/kp);
writeln('Среднее арифметическое отрицательных чисел = ', so/ko);
end.
Язык программирования какой?
Ладно, напишу словами, надеюсь вы код оформите.
пользователь вводит число, если оно делится без остачи на 2 - выводим, что оно чётное, если нет, то выводим что оно не чётное.
Функция деления по модулю на С-подобных языках "%", на других "mod".
Примеры:
С++#include <iostream>
using namespace std;
int main()
{
int n;
cin >> n;
if (n%2==0) cout << "This number is even";
else cout << "It is not even number";
cin.get();
cin.get();
return 0;
}
Pascalprogram example;
var n : integer;
begin
readln(n);
if n mod 2 = 0 then write('Number is even') else write ('It is not even number');
realdn
end.
mod - остаток от деления
div - целочисленное деление
A) 4
Б) 4
В) 11
Г) 7
Д) 7
E) 129
№2
Ответ: 30
Вроде да.....................,..