Для какого из чисел ложно высказывание : не(число< 10) или не ( число четное )? а)6 б)74 в)141 г)9
200
446
Ответы на вопрос:
А) не(6< 10) или не(6)не(1)или не(1)0 или 0 0(ложно)б) не(74 < 10) или не(74)не(0)или не(1) 0 или 11 (истинно)в)не(141 < 10) или не(141)не(0)или не(0)1 или 11(истинно)г) не(9 < 10) или не(9)не(1)или не(0)0 или 11(истинно)ответ: 1
Var i, c:integer;an:array[1 ... 10] of integer, a:array[1 ... 10] of integer;
begin
randomize;
for i:=1 to 10 do a[i]: = random (100) - 100;
for i:=1 to 10 do
if a[i]>0 then
begin
an[i]:=a[i];
c:=c+1;
end;
writeln ("Кол-во положительных элементов: ", c) ;
for i:=1 to 10 do
begin
if a[i]<=0 then
begin
an[c]:=a[i];
c:=c+1;
end;
end;
writeln ("Получившийся массив:") ;
writeln (" ") ;
for i:=1 to 10 do write (an[i]," ") ;
end.
Популярно: Информатика
-
kgrdva12.04.2023 14:54
-
listova21.10.2022 15:45
-
Соска99713.02.2023 21:21
-
Александра11079926.01.2020 07:10
-
JakeNJacks27.06.2023 15:10
-
Анютик20051109.02.2022 12:50
-
mulanmango07.04.2023 14:12
-
BTSExo105.02.2022 11:01
-
Enjoy16728.03.2020 02:22
-
Anasstezz17.04.2020 08:54