Дети вырезали из бумаги фигуры. мальчики вырезали по а квадратов, девочки- по b кругов. сколько всего фигур было вырезано, если в классе 9 мальчиков и 11 девочек?
begin randomize; writeln('Массив: '); for i:=1 to 20 do A[i]:=random(21)-10; for i:=1 to 20 do write(A[i]:5); writeln; writeln('Каждый пятый эелемент массива: '); for i:=1 to 20 do if i mod 5 = 0 then write(A[i]:5); end.
2. var x,i: integer; A: array [1..20] of integer;
begin randomize; writeln('Массив: '); for i:=1 to 20 do A[i]:=random(11);for i:=1 to 20 do write(A[i]:5); writeln; writeln('Натуральные числа в диапазоне [5..10]: '); for i:=5 to 10 do write(A[i]:5); writeln; x:=1; writeln('Их произведение: '); for i:=5 to 10 do x:=A[i]*x; write(x:5); end.
9a и 11b
Объяснение: