1ТМИ Опрацювання
ИЧНИХ величин
Встановіть відповідність між операторами та їх призначенням.
Выберите
For i:=1 to 10 do If All
<0 Then S:= S + A[i]
К:= 0; For i:=1 to 10
do If A[i]<0 Then K:= K
+ 1
Выберите...
Виведення від'ємних елементів масиву у поле спис-ку ListBox1
Заміна нулями від'ємних елементів масиву
Знаходження суми від'ємних елементів масиву
Визначення кількості від'ємних елементів масиву
Выберите...
For i:=1 to 10 do If A[i]
<0 Then
ListBox1.Items. Add
(IntToStr(A[i]))
For i:=1 to 10 do If A[i]
<0 Then A[i]:= 0
Выберите...

революция 1917 года и великая отечественная война (1941-1945)

var

  x,y,z: longint;

begin

  readln(x,y,z);

if (x> 100)or(y> 100)or(z> 100) then writeln('false')

else writeln('true');

end.

f8 формула: =b12*5. b5 формула: =а4+d6. c7 формула: =d6/$a$2. f9 формула: =$c$5-g1. e5 формула: =c$5-$e9.

random это  функция  возвращающая случайные числа от 1 до указанного диапазона, но отрицательных чисел тут нет, так что воспользуемся приемом:

a: = random(101)-50;       {числа от -50 до 50}

b: = random(101)-200;     {от -100 до 100}

а теперь выведи на экран все положительные, а затем отрицательные элементы - проверяй на больше/меньше нуля!