Var
x: real;
begin
readln(x);
if x=0 then exit;
write(1/x);
end.
Не понимаю, зачем тут repeat
Буду писать 4 цифры, 1 - A 2 - B 3 - C 4 - Результат
1)
0 0 0 1
0 0 1 0
0 1 0 1
0 1 1 0
1 0 0 1
1 0 1 0
1 1 0 0
1 1 1 0
2)
0 0 0 1
0 0 1 1
0 1 0 1
0 1 1 1
1 0 0 1
1 0 1 0
1 1 0 1
1 1 1 1
3)
0 0 0 1
0 0 1 0
0 1 0 1
0 1 1 0
1 0 0 1
1 0 1 0
1 1 0 0
1 1 1 0
4)
0 0 0 0
0 0 1 1
0 1 0 0
0 1 1 1
1 0 0 0
1 0 1 1
1 1 0 0
1 1 1 0
5)
0 0 0 1
0 0 1 0
0 1 0 0
0 1 1 0
1 0 0 0
1 0 1 0
1 1 0 0
1 1 1 0
Программа должна выглядеть вот так:
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, так же допустили сиснтаксические ошибки.
Привет!
Тематика это: Тема о которой идёт речь, допустим говорят два повара, они говорят о еде, тематика: готовка еды
А в свою же очередь аудитория это те люди которые слушают, допустим есть ТВ канал, у него есть аудитория ( например 5 миллионов человек ). Аудитория делится на группы:
0+ Все
6+ От 6 лет
12+ От 12 лет
16+ От 16 лет
18+ От 18 лет
Так же, в соответствии с законом РФ, указывать рекомендованный возраст, это называют так:
0+ Для всех
6+ Для детей
12+ Для подростков
16+ Для тех кому исполнилось 16 лет ( Или же см. обозначение 12+ )
18+ Запрещено для детей
Процес угадывания, т.е нет факта что произошло угадывание, просто факт действия, удачный или нет.
64 = 2 в ст. 6
6 бит на одну попытку