Пожалуйста решите информатику 9 класс очень надо20баллов Одномерный массив с четырьмя операторами lf Задан фрагмент программы : program var 03;{задание 20_2} Var A:array[1...12] of integer; ...

Вам нужно узнать решение и ответ на вопрос Пожалуйста решите информатику 9 класс очень надо20баллов Одномерный массив с четырьмя операторами lf Задан фрагмент программы : program var 03;{задание 20_2} Var A:array[1...12] of integer; ... и правильно выполнить домашнюю работу по предмету Информатика? Готовое решение смотрите далее.

Пожалуйста решите информатику 9 класс очень надо20баллов
Одномерный массив с четырьмя операторами lf
Задан фрагмент программы :
program var 03;{задание 20_2}
Var A:array[1...12] of integer;
I s1 s2 s3 s4:integer;
Begin
A [1]:=25;A[2]:=18;A[3]:=9;A[4]:=16;
A[5]:=13;A[6]:=20;A[7]:=15;A[8]:=24;
A[9]:=23;A[10]:=13;A[11]:=40;A[12]:=23;
for I:=1to12do
S2:=100;
Begin
IfA[i]mod2=0 then S1:=S1+A[i];
If(A[i]mod 5=0) and (A[i] S2:=A[i];
IfA[i]mod5=0thenS3:=S3+1;
If(A[i]mod10=3)then S4:=S4+A[i];
End;
Write(S1;";S2;";S3;";S4)
End

В тексте программы приличное количество синтаксических и логических ошибок. Программа просто работать не будет. Начиная с первой строки - название программы на языке паскаль не может начинаться с цифры. Пропущены запятые и точки. Неправильно расставлены операторные скобки (begin ..end). Приведите в порядок код программы, тогда буде иметь смысл повозиться с ней.

Подобные ответы

Программа. Вычислить площадь и периметр прямоугольного треугольника по трем его сторонам. Информатика
Программа. Вычислить площадь и периметр прямоугольного треугольника по трем его сторонам.
Помогите, нужно срочно
Помогите, нужно срочно
ПОЖАЛУЙСТА ООООООЧЕНЬ СРОЧНО
ПОЖАЛУЙСТА ООООООЧЕНЬ СРОЧНО
Выбери лишнее. Работа со списками может применять
Выбери лишнее. Работа со списками может применять
СРОЧНО ПОМОГИТЕ !!!!!!!!
СРОЧНО ПОМОГИТЕ !!!!!!!!