Даю 100 баллов!!! Информатика реш. Помогите прошу. Нужно решить любой из трех правильно, обязательно правильно!
Задача 1
Результат - 4
Задача 2
var A: array[1..25] of integer;
ki,: integer;
begin
k:=0;
for i:= 0 to 10 do
read(A[j]);
if A[i]>4 then k:=k+1
end;
writeln ('k=', k);
end.
Задача 3
Решение на картинке.
Гений, в одном правда ошибься, мне кажется во втором. Еще мог бы один такой же вариант за сотку решить?
Нет, все правильно было, я просто идиот, которйы чутка поздно понял. Грац