Есть ответ 👍

Написать программу, которая делает следующее: 1) спрашивает у пользователя кол-во чисел 2) после того, как пользователь ввел нужно кол-во чисел, программа выводит их сумму.

297
314
Посмотреть ответы 2

Ответы на вопрос:


Var n,a,s,i: integer; begin write('n = '); readln(n); writeln('введите ',n,' чисел'); s: =0; for i: =1 to n do   begin   readln(a);   s: =s+a;   end; writeln('s = ',s); end. пример: n = 5 введите 5 чисел 12 21 37 40 28 s = 138

здесь не нужно учитывать порядок роз в букете, а только их количество.

 

program krysatul; uses crt; const  bel=8;   kras=7; var  i,j,nom: integer; begin  writeln('*** alphaues is ***');   writeln('***                  ok                        ***');   writeln();   nom: =0; {количество вариантов}  for i: =0 to bel do {организуем цикл перебора для белых роз}       for j: =0 to kras do {организуем цикл перебора для красных роз}            if i+j=5 then {если выбрано в сумме 5 цветов}                      begin                          nom: =nom+1; {посчитать это как +1 вариант}                           writeln(nom,'-й вариант: ',i,' белых и ',j,' красных'); {напечатаем номер варианта и количество роз}                      end;       writeln();       writeln('всего вариантов: ',nom); {напечатаем количество вариантов}end.

Популярно: Информатика