Язык желательно си, но можно любой. Дано целое число N. Требуется найти и вывести N верхних строк треугольника Паскаля. Треугольник Паскаля —это треугольник, состоящий из чисел следующего вида: каждое
k-е в любой строке, кроме нулевой строки, равно сумме k-го и (k-1)-го чисел из
предыдущей строки. Нулевая строка состоит из единицы.
Input
Со стандартного устройства ввода вводится целое число N (1 <= N <= 33) —количество
строк для вывода.
Output
Требуется вывести N строк с элементами треугольника Паскаля. Выводить пробел в
конце строки не нужно.
Sample Input
5
Sample Output
1
1 1
1 2 1
1 3 3 1
1 4 6 4 1
227
373
Ответы на вопрос:
Var n,count,i: integer; a: array[1..100] of integer; begin randomize; write ('введите n: '); readln (n); count: =0; for i: =1 to n do begin a[i]: =random(1,10); write (a[i],' '); // для наглядности. можно удалить if (a[i]> 5) and (a[i] mod 2 =1) then begin a[i]: =7; count: =count+1 end end; writeln; for i: =1 to n do write (a[i],' '); writeln; writeln ('count = ',count); end. пример: введите n: 10 1 9 6 9 9 4 8 8 9 6 1 7 6 7 7 4 8 8 7 6 count = 4
Популярно: Информатика
-
ккк13026.06.2022 15:57
-
1955723.11.2022 18:40
-
ficusborislav02.05.2020 20:57
-
qazdhnvd04.04.2022 12:42
-
BlackNeck73019.03.2020 01:56
-
иринка280713.02.2023 16:29
-
Foksit200601.01.2023 22:33
-
8777321401526.07.2020 10:40
-
borisovaekaterina1531.08.2021 00:28
-
alexandra298127824710.04.2021 22:48