Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 7. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 7. Программа должна вывести одно число — сумму чисел, кратных ПОСТАВЛЮ ВАМ ВЫСШИЙ БАЛЛ! ОЧЕНЬ

200

294

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

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

pOMOGITPLZ1

Информатика

4,4(81 оценок)

Определить, является ли целое число n четным двузначным числом, и делится ли оно на число k: uses crt; var n,k,i,c: integer; begin write('n - '); read(n); write('k - '); read(k); c: =0; for i: =10 to 99 do begin if (i=n) and (i mod 2=0) and (i mod k=0) then c: =c+1; end; if c< > 0 then else write('yes') end