Информатика, опубликовано 2018-08-22 22:20:48 by Гость
Задание 7 целтаб Dat[1:7] цел k, m Dat[1]:=15; Dat[2]:=18 Dat[3]:=22; Dat[4]:=20 Dat[5]:=23; Dat[6]:=24 Dat[7]:=20 m:= 0 нц для k от 1 до 7 если Dat[k] >20 то m:=m+1 все кц
Ответ оставил Гость
(QBasic)
CLS
DIM dat(7)
dat(1) = 15
dat(2) = 18
dat(3) = 22
dat(4) = 20
dat(5) = 23
dat(6) = 24
dat(7) = 20
FOR k = 1 TO 7
IF dat(k) > 20 THEN
m = m + 1
END IF
NEXT
m будет равно 3
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.