2. Напишите программу формирования и вывода массива размером 6*3, каждые три...

Question

2. Напишите программу формирования и вывода массива размером 6*3, каждые три последовательных элемента в строке которого составлены по правилу:
1-й – равен значению суммы текущих индексов, увеличенному на 3;
2-й – равен квадрату предыдущего индекса;
3-й – равен сумме двух предыдущих элементов.

Answer 1

Program qq;
var a,b,s:integer;
begin
writeln('Введите число');
readln(a);
b:=a*3;
a:=b*b;
s:=b+a;
writeln('Ответ: ', s);
end.
{На pascal abc проверил работает без ошибок }

Comments

Что-то мало слишком)

---

Сударь вам надо было :1-й – равен значению суммы текущих индексов, увеличенному на 3;
2-й – равен квадрату предыдущего индекса;
3-й – равен сумме двух предыдущих элементов.

---

и вот вам я это сделал :b:=a*3;
a:=b*b;
s:=b+a;

Answer 2

Ответ на задание лежит в файле