Program n1;
Uses Crt;
Var
c: array[1..10] of integer;
i, b, k:integer;Begin
for i:=1 to 10 do begin
c[i]:=random(40) - 20;
write(c[i]:4);
end;
writeln();
writeln('Enter B = '); Readln(b);
k:=0;
for i:=1 to 10 do if (c[i]<b) then k:=k+1;
writeln('Kol-vo iskomih chisel: ', k);
<span>End.</span>
1 навести курсор на ошибочно написанный символ
2 кликнуть левой кнопкой мыши
3 delete
4 задание не вижу,
5 D
6 D
7 B
8 А
Единственный возможным вариантом считаю, обращение в техническую поддержку. Там процедура не особо сложная, возможно спросят: имя аккаунта, когда создан, что написано в профиле, какая была почта, старый телефон, место откуда последний раз заходил. Но восстановлению подлежит.
Для какого из указанных значений числа Х истинно выражение (X<3) & ((X<2) V (X>2))?
1
, т.к. данное число меньше 3, и меньше 2 (во второй скобке достаточно 1 ПРАВДИВОГО высказывания)
19) Для какого из указанных значений X истинно высказывание ((X<5) & ((X>5)) → (X>15))?
1
20) Для какого из указанных значений числа Х истинно выражение (X>1) & (X>2) & (X≠3)?
4
21) Для какого числа истинно высказывание ((X > 3)v(X < 3)) →(X < 1)
3