На языке Си:
#define n 10
int main()
{
int mn=1;
int mas[n];
for(int i=0; i<n;i++)
{
mas[i]=10+rand() % 100;
printf(" %d " ,mas[i]);
}
for(int j=0; j<n; j++)
{
if(mas[j] %2 ==0)
{
mn = mas[j]*mn;
}
}
printf(" Proizvedenie chetnix elementov ravno: ", mn);
return 0;
}
Если хочешь вывести текст
write('текст'); //Ковычки одинарные
если ты хочешь вывести переменную то без кавычек
a := 1;
write(a);
Также можешь добавить в конец "ln" т.е. writeln(...); после того как выведет он перенесет на следующую строку
Оператор ввода:
Read(переменная); read(a); read(b);
Также и тут можешь перенести строку:
Readln(...);
program numbers;
var x, y: integer;
begin
writeln('Введите число.');
read(x);
if (x mod 10)=(x div 10) then write('Цифры одинаковые') else write('Цифры разные');
end.
Вроде после & скобка. Возможно