Дано целое число. верно ли, что оно кратно 7 и содержит 3цифры? составьте программу и проверьте ее для указанных чисел сравнив результат работы программы с правильном результатом.. число правильный ответ 21 неверно 121 неверно 777 верно -777 верно только программу написать!

196

224

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

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

Kristgame

Информатика

4,7(74 оценок)

Var a: integer; begin writeln('введите число'); readln(a); if a< 0 then a: =(-1)*a; if (a mod 7 =0) and (a div 100> 1)then writeln('верно') else writeln('неверно'); end.

Няшка9000

Информатика

4,6(26 оценок)

#include < iostream> using namespace std; int main() { int n=10,k=0; int a[n]; srand(time(null)); cout< < "array: "< < endl; for (int i=0; i< n; i++) { a[i]=rand() % 6; cout< < a[i]< < " "; } cout < < endl; for (int i=1; i< n; i++) if (a[i-1]==a[i]) { k++; if (k==1) cout< < "есть: "; cout < < a[i] < < " "; } if (k==0) cout < < "нет"; return(0); } пример: array: 0 3 0 5 3 2 2 5 1 1есть: 2 1