program n1; const n=10; var mas: array[1..n] of integer; i: integer; max,min,sum: integer; ar: real; begin for i: =1 to n dobegin mas[i]: = random (20)-10; write(mas[i],' '); writeln end; max: =1; for i: =2 to n do if mas[i]> mas[max] then max: =i; writeln; writeln('максимаьное значение a[',max,']= ',mas[max]); min: =1; for i: =2 to n do if mas[i]< mas[min] then min: =i; writeln; writeln(минимальное значение a[',min,']= ',mas[min]); for i: =1 to n do sum: =sum+mas[i]; ar: =sum/n; writeln; writeln('среднее арифметическое = ',ar); end.{немного нерационально но работает=)}
Ответ дал: Гость
program m;
uses crt;
var a,b,c,sum: integer;
begin
clrscr;
readln(a,b,c);
sum: =a+b+c;
writeln(' ',sum);
readkey;
end.
Ответ дал: Гость
1-я строка имеет длину 1
2-я - 3
3-я - 7
4-я - 15
5-я - 31
6-я - 63
7-я - 127
8-я - 255
9-я - 511 = 8я+8я+i
причем символы с 1 по 255 это первая 8-я строка символы с 256 по 511 это 2-я 8-я строка и символ i
8-я строка это две 7-х строки и символ h
каждая строка в начале имеет предыдущие строки таким образом в начале 8-й строки стоит символ a и далее так как в 4-й строке написано
Популярные вопросы