Дан целочисленный массив на 10 элементов.найти количество и сумму элементов кратных k

227

350

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

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

Witch23

Информатика

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

Var a: array[1..10] of integer; i,k,s,r: integer; begin for i: =1 to 10 do readln(a[i]); writeln('введите число k'); readln(k); s: =0; r: =0; for i: =1 to 10 do if (a[i]modk=0) then begin r: =r+1; s: =a[i]+s; end; writeln(s,r); end.

maksim00789

Информатика

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

Обозначим: пирожное& выпечка = х₁=3200 пирожное =х₂ =8700 выпечка х₃= 7500 найти: пирожное|выпечка = х₄ х₄=х₂+х₃-х₁= 8700+7500-3200= 13000 ответ: по запросу пирожное|выпечка будет найдено 13000 страниц