Даю 100 баллов!!! Информатика реш. Помогите прошу. Нужно решить любой из трех правильно, обязательно правильно!
Приложения:
![](https://st.uroker.com/files/8d3/8d311fc80b87295943cfb7f137e2bac0.png)
![](https://st.uroker.com/files/f6c/f6c45384281fdfcf8302b54359429b47.png)
![](https://st.uroker.com/files/013/013200f4a24fb6c8a1d2d8d62e4eeb61.png)
Ответы
Ответ дал:
2
Задача 1
Результат - 4
Задача 2
var A: array[1..25] of integer;
ki,: integer;
begin
k:=0;
for i:= 0 to 10 do
begin
read(A[j]);
if A[i]>4 then k:=k+1
end;
writeln ('k=', k);
end.
Задача 3
Решение на картинке.
Приложения:
![](https://st.uroker.com/files/5e0/5e0bd655b196d2b0c48d014beb3cbe87.jpg)
hardmissl:
Гений, в одном правда ошибься, мне кажется во втором. Еще мог бы один такой же вариант за сотку решить?
Вас заинтересует
4 месяца назад
5 месяцев назад
5 месяцев назад
2 года назад
7 лет назад
7 лет назад