Выполнить в Pascal
10-11 класс
|
.....
В массиве 3 на 6 поменять местами элементы второго и пятого столбца строки.
var
i,j,x:integer;
a:array[1..3,1..6]of integer;
begin
writeln('Исходный массив:');
for i:=1 to 3 do
begin
for j:=1 to 6 do
begin
a[i,j]:=random(20);
write(a[i,j]:4);
end;
writeln;
end;
writeln;
writeln('Преобразованный массив:');
for i:=1 to 3 do
begin
x:=a[i,2];
a[i,2]:=a[i,5];
a[i,5]:=x;
end;
for i:=1 to 3 do
begin
for j:=1 to 6 do
write(a[i,j]:4);
writeln;
end;
end.
Другие вопросы из категории
а) при монохроматической схеме (напишите два цвета)
_______________________________?
б) при триадной схеме _________________________.
_________________________?
Помогите пожалуйста!!!!!
Читайте также
частное. Напишите на языках Pascal и C++ программу, моделирующую выбор одной из костей домино ( в наборе 28 костей домино, каждая состоит из двух половин, на каждой половине – от 0 до 6 очков). С помощью этой программы ответьте на вопрос: какова вероятность того, что выпадет кость с числом очков, кратным 3
1) 110 + 101;
2) 10101-11;
3) 101 ´ 11;
4) 1110:10.
Задание 12. Выполните арифметические действия:
а) 11102 + 10012;
б) 678 + 238;
в) AF16 + 9716;
г) 11102 - 10012;
д) 678 - 238;
e) AF16 - 9716;
ж) 11102 × 10012;
з) 678 × 238;
и) AF16 × 9716;
к) 10102 : 102;
л) 748 : 248;
м) 5А16 : 1Е16.
формул языка Pascal сделать так, чтобы случайные числа выпадали в интервале (a;b)
Выберите один или несколько ответов:
Антивирусная защита
Табличная обработка данных
Машинная и деловая графика
Работа с базами данных
Обработка текстовКакие функции выполняет прикладное ПО?
У нас на первом курсе тема Pascal, а я гляжу на него как баран на новые ворота...
Я отстал сильно на 2 недели и ни могу ни как понять его... Скажите пожалуйста по конкретнее с чего начать, что именно нужно изучить или выучить, понять, чтобы знать как составлять на нём программы ?