Помогите пожалуйста срочно! задача в Паскале
5-9 класс
|
Двухмерный массив размерностью 6 и 4 заполнить 1 строку единицами , 2 строку двойками, 3 строку тройками.
var
i,j:integer;
a:array[1..6,1..4]of integer;
begin
for i:=1 to 3 do
for j:=1 to 4 do a[i,j]:=i;
for i:=4 to 6 do
for j:=1 to 4 do a[i,j]:=random(10);
writeln('Массив: ');
for i:=1 to 6 do
begin
for j:=1 to 4 do write(a[i,j]:3);
writeln;
end;
end.
Другие вопросы из категории
Задача 1. Дана длина ребра куба а. Найдите объём куба V=a3 и площадь его поверхности S=6a2
Задача 2.Даны 2 числа не равные нулю. Найдите сумму, разность и произведение их модулей.
Читайте также
Даны два натуральных числа m и n. (m,n ≤ 9999). Проверить, есть ли в записи числа m цифры, одинаковые с цифрами в записи числа n.
клавиатуры.
2)найти перевертышь трехзначного числа.
налево и слева направо.
1)вычислите длину окружности и круга по данному радиусу входные-длина окружности, s,l-выходные
2)Найти площадь кольца с внутренним радиусом r1 и внешним r2
3)Даны 2 положительных действительных. Найти средние арифметическое и средние геометрическое a,b - входные данные, (a,b)*2 -ср. арифмет.
1000.Нужно изменить программу так,чтобы она находила:
а) дробную часть чисел;
б) произведение чисел, меньших 22;
в) сумму чисел, которые попадают в промежуток [10, 50]. Заранее,спасибо большое!)))))