kostmax1971
?>

Напиши программу на языке Паскаль и выведи ответ на экран.Вычислить n!, если значение n пользователь вводит с клавиатуры.Если n=9, то на экране выводится n!=

Информатика

Ответы

Fedorov1283

.........,..........


Напиши программу на языке Паскаль и выведи ответ на экран.Вычислить n!, если значение n пользователь
cvetyzelen283
#include <iostream>#include <ctime>//Бібліотека для рандомуusing namespace std;int main(){ int array[10];//Масив int Max_Num=0,Min_Num=0;// Мінімальне і Максимальне числа bool Positive_or_negative=0;//Число додатнє чи відємне srand(time(NULL));//Рандом.Кожний раз інший. for(int i=0;i<10;++i) { Positive_or_negative=rand()%2; if(Positive_or_negative==false)//якщо Positive_or_negative==0 { array[i]=-(rand()%10);//Рандом від -10...0 } else { array[i]=rand()%10;//Рандом від 0...10 } if(array[i]>Max_Num)//Пошук макс. числа { Max_Num=array[i]; } if(array[i]<Min_Num)//Пошук Мін. числа { Min_Num=array[i]; } cout<<array[i]<<" "; } cout<<endl<<"Max. number is:"<<Max_Num<<endl;//Вивід максимально числа cout<<"Min. number is:"<<Min_Num<<endl;//Вивід мінімально числа system("pause>>void");//закінчення программи.}
dima-pashkovec
Итак, уважаемые сидельцы за компьютером и смотрельцы в монитор, я продолжаю обобщать свой более чем десятилетний опыт подобного времяпрепровождения, стараясь объединить с еще не совсем забытым медицинским образованием и изложить в простой и понятной любому форме. Буду весьма признателен за любые, а особенно объективные дополнения и исправления, особенно от старшего поколения в подрастающему, чтобы у нашей смены не проваливалась грудь, не портилось зрение и не сводило пальцы. Словом, чтобы общение с железным другом было максимально безопасно для здоровья

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Напиши программу на языке Паскаль и выведи ответ на экран.Вычислить n!, если значение n пользователь вводит с клавиатуры.Если n=9, то на экране выводится n!=
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

kirieskamod262
Евгений1286
ann-perminova2008
emilbadalov
myatadinamo
yanva
Anatolevna
ivanovanata36937365
zakaz6354
Zuriko1421
prianik6
Щербаков33
lele4kass
intermar2000
Daletskaya Sergei1121