Вмассиве сумму чётных элементов ,кратных 7. программа паскаль,

pinGvin022 pinGvin022    2   03.10.2019 10:20    0

Ответы
Ronaldinho2003 Ronaldinho2003  09.10.2020 13:52

начало где вар, и аррау напиши сам(а)

for i=1 to 7 do

writeln(x)

k:=0;

for i=1 to 7 do

if (a[i] mod 2 =0) and (a[i] mod 7 =0)

then k:=k+1;

writeln(k)

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика