Нужно перевести данную программу на язык С + с паскаля. Срочно! program tt; uses crt; const…

Question

36

Нужно перевести данную программу на язык С + с паскаля. Срочно! program tt; uses crt; const Nmax=10; var m: array[1… Nmax] of integer; i,i_min,i_max: byte; min,max: integer; begin ClrScr; randomize; writeln ('Исходный массив: '); for i: =1 to Nmax do begin m[i]: =random (20) -10; write (m[i],'); end; max: =m[1]; min: =m[1]; i_min: =1; i_max: =1; for i: =1 to Nmax do begin if m[i]>max then begin max: =m[i]; i_max: =i; end; if m[i]

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

vvp00 · Accepted Answer

37

vvp00

20 февраля 2023

#include #include #include #include using namespace std; //если пишешь в борланде то удали эту строкуconst short n=10; int main () { srand (unsigned (time (NULL); int a[n]; short iMax=0; short iMin=0; cout << "Source massive \n"; for (int i=0; i < n; i+) { a[i]=rand () % 21 — 10; cout << a[i] << "; if (a[iMax] < a[i]) iMax=i; if (a[iMin] > a[i]) iMin=i; } cout << "\nMax a[" << iMax+1<< "]=" << a[iMax] << "\n"; cout << "Min a[" << iMin+1<< "]=" << a[iMin] << "\n"; _getch (); //если пишешь в борланде замени эту строку на getch (); return 0; }

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: