27 - 1 ,28-4,29-4 привет гыыы
Программа должна выглядеть вот так:
program simvol;
const
n=5;
var
A:array[1..n,1 ..n]of integer;
i, j:integer;
Begin;
for i:=1 to n do
begin
for j:=1 to n do
begin
(A[i,j]):=random(100);
write(A[i,j]:4);
end;
writeln;
end;
end.
Вы не объявили переменные i и j, так же допустили сиснтаксические ошибки.
Var i:integer;
begin
for i := 1 to 10 do
writeln('1*', i, '=', i);
<span>end.</span>
Идем с конца:
1) 99 - 1 = 98
2) 98 / 2 = 49
3) 49 - 1 = 48
4) 48 / 2 = 24
5) 24 / 2 = 12
6) 12 / 2 = 6
7) 6 / 2 = 3
8) 3 - 1 = 2
9) 2 / 2 = 1
10) 1 - 1 = 0
Все получилось!
Ответ: 2121111212