Решение 5 задачи, решу 2 и 4, если ответите на вопрос в обсуждении.
Опять же задачи максимально ущербно сформулированы, и тут нет ответа на такие вопросы как "выводить ли сам массив на экран, вещественные или целые использовать типы, как вообще ввод и вывод должен работать", поэтому не жаловаться на неверное построение задачи.

program abc;
var
a:array[1..100] of integer;
i,chet,nechet:integer;
begin
nechet:=0;
chet:=0;
for i:=1 to 100 do
a[i]:=random(99)+1;
for i:=1 to 100 do
if(odd(a[i])=true) then inc(nechet)
else inc(chet);
writeln(chet,' ',nechet);
end.

0 0

4 года назад

Пожалуйста помогите сделать и написать ответы

Александра16

1-2 - Да
2-1 - Нет
3-3- Да
Очень лёгкий вопрос как по мне.

0 0

4 года назад

В каком году вышел первый компьютер

Морозов Роман Вал...

Првый компьютер вышел в 1958

0 0

4 года назад