Есть ответ 👍

Решить : 1) с клавиатуры вводятся 3 целых числа. определите количество положительных чисел в этом наборе. 2) с клавиатуры вводится натуральное число n. вычислите сумму s=1+2++n. 3) заполните элементы массива последовательностью чисел: 2,5,10,17,

291
497
Посмотреть ответы 2

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


1) program fagasg; var a,b,c,d: integer; begin writeln('введите первое число'); readln(a); writeln('введите второе  число'); readln(b); writeln('введите третье число'); readln(c); d: =0; if a> 0 then d: =d+1; if b> 0 then d: =d+1; if c> 0 then d: =d+1; writeln('количество положительных чисел: ',d); end.2)  program gsggdfd; var n,s,i: integer; begin writeln('введите n'); readln(n); s: =0; for i: =1 to n do  s: =s+i; writeln('сумма последовательности равна: ',s); end.3)program afsdgf; var a: array[1..100] of integer;     i,h,s,l: integer; begin  writeln('ведите размер массива');   readln(h);   s: =1;   l: =1;   for i: =1 to h do    begin      a[i]: =s+l;       s: =s+2;       writeln(a[i]);       l: =a[i];     end; end.
vladik2ppp
4,6(43 оценок)

собирается-журналист  опрашивает  людей  для  статьи

обрабатывается-ученик  решает 

-учитель  объясняет  материал 

создается-все  тот  же  журналист  придумывает  статью

запоминается-парнеь запоминает  номер  телефона  девушки

измеряется-программист  рассчитывает  сколько  бит  займет  программа

копируется-ученик  списывает  у  одноклассника

передается-две  девушки  обмениваются  новостями

принимается-ученики  слушают  учителя  на  уроке

разрушается-придуманная  выше  указанным  журналистом  статья 

делится  на  части-человек  разбирает  сообщение  в  котором  пропущены  пробелы

ищется-человек  ищет  материал  для  доклада  в  интернете

подробнее - на -

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