Спо информатике в паскаль! условие: определите, имеется ли в заданном целочисленном массиве x(n) число, кратное заданным числам a и b и не кратное числу c.

236

266

Посмотреть ответы 2

Ответы на вопрос:

Маркизетта

Информатика

4,8(99 оценок)

Program n1; const n=7; var x: array [1..n] of integer; a,b,c,i: integer; begin writeln('ввод массива: '); for i: =1 to n do begin write('введите ',i,' элемент массива: '); readln(x[i]); end; write('введите числа а,b,c: '); readln(a,b,c); if (x[i] mod a=0) and (x[i] mod b=0) and (x[i]< > c) then writeln('есть такое число') else writeln('в массиве нету такого числа'); end.

jdzhafarova

Информатика

4,8(86 оценок)

Логические величины - это понятия, выражаемые словами: истина, ложь в памяти компьютера логической величине ставится в соответствие один бит (двоичная цифра). значению истина соответствует бит, равный единице, а значению ложь - бит, равный нулю. логическая переменная - символически обозначенная логическая величина. если известно. что a, b, x, y и пр. - переменные логические величины, то это значит, что они могут принимать значения только истина или ложь.