Регистрация
Арусяк122
04.12.2021 12:54
Информатика
Есть ответ 👍

Дан массив целых чисел. найти количество тех элементов значение которых положительны и не превосходят число 7. написать программу для паскаля

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

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

kisuli1
kisuli1
4,8(76 оценок)
Const n=10; var a: array[1..n] of integer; k,i; integer; begin writeln('vvedite massiv='); for i; =1 to n do readln(a[i]); k: =0; if (a[i]> 0) and (a[i]< 7) then inc(k); writeln('k=',k); readln; end.
POPKA1kemping
POPKA1kemping
4,8(84 оценок)
2*2-(1) 2*2-(1)=3  3*3-(2)=7  7*4-(3)=25  25*5-(4)=121  121*6-(5)=721  както

Популярно: Информатика