Значение переменной p при n=5 после выполнения программы programmtest; var p, i,n: integer; begin write('введите цельное n=') readln(n); p: =1 for i: =1 to n do p: =p*i; writeln(n,'=',p) end

min і max нужно присвоить а[1].

моя неделя проходит загружено. половину дня я провожу в школе, потом , репетиторы, выйти на улицу, покататься на санках, поваляться в снегу времени практически а мы что-то говорим о здоровой чтобы я изменил? я бы ввёл электронные учебники и ведь это так бы время, не надо было бы писать в тетрадях уроки, набрал на компьютере   и всё. оставалось бы больше свободного времени для прогулок и общения с друзьями.