Напишите программу формирования и вывода массива размером 6x3, каждые три последовательных элемента в строке которого составлены по следующему правилу: 1-й — равен сумме текущих индексов, увеличенной в 10 раз; 2-й — равен целой части от деления случайного числа на сумму текущих индексов; 3-й — равен разности двух предыдущих элементов.
karapetyanhovn1
3
27.08.2019 23:20
0
Другие вопросы по теме Информатика
Даня324556
22.10.2020 13:01
asy23
08.10.2020 02:26
Daria151814
08.10.2020 02:04
zalyaeva85
08.10.2020 01:50
taotourp00p0i
25.01.2021 11:46
viloverbe
25.01.2021 11:46
KPY3
25.01.2021 11:47
Gfykfyj
25.06.2019 09:40
margaritakulak
25.06.2019 09:40
Популярные вопросы
- На собрании обсуждалось много разных вопросов.( есть ли в предложении...
3 - Дан куб, длина ребра 4 см, верхние и нижние грани окрашены в...
1 - Подчеркни имена существительные женского рода с шипящими на...
1 - Какова плотность бетона , мрамора , спирта и бензина...
1 - Груз массой 20 т равномерно перемещают с лебёдки,установленной...
3 - Чому птахи настовбурчують піря під час морозів...
2 - Как испытать кратковременное состояние невесомости не улетая...
3 - Підготуйте повідомлення про види персональних комп ютерів та...
2 - Окраска тела насекомых(бабочки,божьи коровки,мухи),которые живут...
3 - )формула соединения, в котором атом водорода гидроксогруппы...
3
N = 6;
Var
A:array[1..N,1..3] of integer;
i:integer;
Begin
Randomize;
For i:= 1 to N do
Begin
A[i,1]:=i*10;
A[i,2]:=random(i*13) div (i+2);
A[i,3]:=A[i,2]-A[i,1];
WriteLn(A[i,1],' ',A[i,2],' ',A[i,3])
End;
End.