Встречено : = а ожидался оператор: условие: дан массив заполненный по формуле cos(x/3), определить количество - id134782220220423 от catpolina21 23.04.2022 14:44

Question

Информатика: Встречено : = а ожидался оператор: условие: дан массив заполненный по формуле cos(x/3), определить количество его положительных элементов кратных 3 программа program fa; var a: array [1..10] of integer; i, n: integer; begin writeln( введи элементы массива? ); for i : = 1 to 5 do begin writeln( a[ ,i, ]= ); readln(a[i]); end; for i : = 1 to 5 do if (a[i]: =cos(a[i]/3))= 0 then inc(n); writeln( кратных 3: , n); end.

catpolina21 · Accepted Answer

№146 Для начала нужно обьявить переменные,у меня обьявляются оператором DIM,ну думаю,что дим нужен и при этом действие.

Если переменная обозначает любой знак,не имея какого либо обозначения,или указания на конкретное число,тогда это переменная равна 0,обьявим ее.

DIM A,B,C,

(Если значение переменной равно 0,то можно распаложить ее в любом положении,или в задоном(изначально))

Дальше выводим переменные на экран,

(если данная функция не работает,то,тогда нужно ввести после('),знак(,).

PRINT 'A'

PRINT 'B'

PRINT 'C'

Ну и в конце пишем:

Endif

Примечание:

Если значение переменных будет равна 0,то на экране тоже будет равна 0.

MOGZ ответил