Надо нажать на кнопку копировать и затем перевернуть
Лично мне привычно писать и с mod, и с odd, хотя на разных сайтах я действительно встречала MOD чаще. MOD - оператор, выполняющий деление двух чисел и возвращающий целочисленный остаток. Odd проверяет выражение на нечетность. Когда мы начинали изучать Паскаль, нам говорили только про mod, хотя сейчас odd мне кажется удобней. Так что, возможно, это просто неизвестно решающим, не пробовавшим копнуть глубже в информатику.)
1) 7200*8=57600 кбит
2) 57600/ 192= 300 сек
300сек=5 мин
ответ:5 минут
Var
A: array [1..4, 1..5] of real;
i, j, z: byte;
begin
randomize;
z := 0;
for i := 1 to 4 do
begin
for j := 1 to 5 do
begin
A[i, j] := random*2-1;
write(A[i, j]:6:2, ' ');
if A[i, j] > 0 then z := z + 1;
end;
writeln;
end;
writeln('Количество нечетных элементов = ', z);
end.
Может задачу недопонял. Но вот что вышло:
uses crt;
var n,i,s:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
begin
s:=s+i;
end;
writeln(s);
readkey;
<span>end.</span>