Сгенерировать случайным образом массив из 30 элементов в диапазоне [-30; 10]. рассмотреть все отрицательные последовательности в массиве. минимальный элемент в каждой из них заменить нулем. буду
Программа на языке паскаль. const n=30; var i, s0, k, a: integer; b: array [1..n] of integer; begin readln(a); s0: =0; k: =0; randomize; for i: =1 to n do begin b[i]: =random(20001)-10001; {чтобы диапазон случайных чисел был от -10000 до 10000} if (b[i]< 0) then s0: =s0+b[i]; if (b[i]> 0) and (b[i]< =a) then inc(k); end; if (s0< > 0) then writeln(s0, ' - сумма отрицательных чисел') else writeln('отрицательных чисел нет'); if (k< > 0) then writeln(k, ' - количество положительных чисел, не превосходящих числа а') else writeln('положительных чисел не превосходящих числа а, нет'); readln; end.
vinokurova88251
20.10.2020
#include < iostream> #include < conio.h> using namespace std; int main() { setlocale(lc_all,"russian"); int lep; cout < < "\t\tчетное/нечетное кол-во лепестков у ромашки\n\n" < < endl; cout < < "введите, сколько будет лепестков у ромашки: \n"; cin > > lep; if(lep%2! =0) { cout < < "у ромашки не четное кол-во лепестков! " < < endl; } else { cout < < "у ромашки четное кол-во лепестков! " < < endl; } _getch(); return 0; }
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Сгенерировать случайным образом массив из 30 элементов в диапазоне [-30; 10]. рассмотреть все отрицательные последовательности в массиве. минимальный элемент в каждой из них заменить нулем. буду
окей, я тебе программу, но только на с++ из-за неточности в языка программирования.
#include < iostream>
void main(void) { short _array[10]; for(int i = 0; i< =9; i++) { _array[i] = rand()%40-30; } system("pause > nul"); }