Где скрытая проводка. Есть-ли Устройство Защитного Отключения от поражения электрическим током, какое, и исправное-ли оно. Нужно Электромеханическое, не электронное
Такжен, информация по безопасной работе с электричеством и информация, куда звонить при повреждении газовых и водопроводных труб Главное нужно знать, что вы хотите получить в результате ремонта, и сколько вы согласны на это потратить денег и времени.
<span>Если денег много - то знания могут быть минимальными, чем меньше денег - тем больше вы должны знать и уметь)</span>
Система программа установки
= это сравнение
:= это оператор присваивания
Защищённые ПК
Промышленные ПК
Тихий ПК
Компактные ПК
Немного не понял вопрос
Uses Crt;
Const
N = 10;
Var
X:array[1..N] of integer;
i,k:integer;
Begin
ClrScr;
Write('Введите массив целых чисел X(',N,'): ');
For i:= 1 to N do
Begin
Read(X[i]);
if X[i] > 0 then k:=k+1
End;
WriteLn('Количество положительных элементов X(',N,'): ',k);
ReadLn
End.
Пример работы программы:
Введите массив целых чисел X(10): 1 2 3 -4 -5 -6 7 8 9 0
Количество положительных элементов X(10): 6