Большая, маленькая, квадратная, круглая, шоколадная, карамельная, помадка.
В фантике, в коробке, без всего.
Какие ещё характеристики можно придумать?
Program JolieWErnAje;
uses crt;
const n=10;
var
a:array[1..n,1..n] of integer;
i,j: integer;
tp: integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
writeln();
tp:=1;
randomize;
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:= random(20)+1; {заполняем массив}
write(a[i,j]:4);
if a[i,j] mod 3 = 0 then tp:=tp*a[i,j];
end;
writeln();
end;
writeln();
writeln('Произведение элементов, кратных 3, равно ',tp)
end.
Задачи и блок схемы в документе, времени на 3 задачу, попробуй сама.
Для того, чтобы составить трассировочную таблицу, нужно иметь сам алгоритм. Позволю предположить, что там было нечто вроде такого (запись на языке кумир):
алг бинвдес
нач
цел N2, k, N10
ввод N2
k := 1
N10 := 0
нц пока N2<>0
N10 := N10 + mod(N2, 10) * k
k := k * 2
N2 := div(N2, 10)
кц
вывод N10
<span>кон
</span>
Таблица во вложении
program d1;
var x,v,b,n,d,q:integer
begin
x:=A*A;
v:=x*x*A;
b:=v*v*v*x;
writeln(x);
writeln(v);
writeln(b);
end.