Const n=16; var x: array[1..n] of integer; i,k: integer; begin randomize; writeln('элементы массива'); k: =0; for i: =1 to n do begin x[i]: =random(51)-25; write(x[i]: 4); if x[i]< 0 then inc(k) end; writeln; writeln('количество отрицательных элементов равно ',k); end. тестовое решение: элементы массива 3 -14 -7 15 10 12 -11 -13 -21 -13 13 -17 9 -7 -24 20 количество отрицательных элементов равно 9
J: =0; for i: =1 to n do if a[i]< o then j: =j+1; writeln (j); end.
Спасибо
Ответ дал: Гость
технические характеристики это:
длина самолета размах крыла общее число мест бизнесс-класс (места) эконом-класс (места) крейсерская скорость максимальная высота полёта
дальность полета
инфомодель - это модель данных, это схема, описывающая информацию
Ответ дал: Гость
1) 24+18+12=54 (ч.) 2) 54-35=19 (ч.) не любят не один вид спорта. 3) 10+8+5=23 (ч.) - любят 2 или больше видов спорта. 4) 23-19=4 (ч.) - любят все три вида спорта.
Популярные вопросы