1.var a:array[1..100] of integer;
n,s,i:integer;
begin
write('Количество элементов=');
readln(n);
for i:=1 to n do begin
readln(a[i]);
end;
for i:=1 to n do begin
if a[i]>0 then a[i]:=-a[i]
else a[i]:=abs(a[i]);
end;
for i:=1 to n do begin
write(a[i]:3);
end;
end.
Жорсткий диск,ссд накопитель,відеокарта,процесор
78=>16
214=>326
89=>131
111=>157
1. а) Петя едет в автобусе, читает книгу и насвистывает.
б) Петя насвистывает, когда едет в автобусе или читает книгу.
в) Петя едет в автобусе и читает книгу или насвистывает.
г) то же, что и а).
д) Петя едет в автобусе или читает книгу и насвистывает.
2. а) Число 5-простое = 1. б) Луна-спутник Венеры = 0.
в) Число 5-простое и Луна-спутник Венеры = 0.
г) Число 5-простое или Луна-спутник Венеры = 1.
д) Если число 5-простое, то Луна-спутник Венеры = 0.
е) Число 5-простое тогда и только тогда, когда Луна-спутник Венеры = 0.
3. а) 1999<2000 и 1999>2000
б) Петя решил все задания контрольной работы и Петя не решил все задания контрольной работы
в) Неверно, что луна спутник Земли и Неверно, что луна не является спутником Земли
г) Мишень поражена не первым выстрелом и Неверно, что мишень поражена не первым выстрелом.
4. А=1, В=0, С=1, Д=0.
A) Сложи все 4 числа, затем сумму раздели на 4. Ответ на экран
б) Прочитай рост сохрани в перемнную выведи на экран. То же самое для веса и возраста
с) Ты можешь использовать теорему Виета или же вычислять по формуле через дискриминант. Не забудь проверить существуют ли корни у этого уравнения.