Регистрация
karrr123
31.08.2020 23:55
Информатика
Есть ответ 👍

Найти сумму 3,6,9...333. Программирование на языке ХЕЛП МИ ПЛИЙС

212
245
Посмотреть ответы 1

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

Палина200413
Палина200413
4,5(49 оценок)
Программа: var b4: array [1..20] of longint;       i,min,n: longint; begin   read (n);   min: =100000;   n: =1;   for i: =1 to n do read (b4[i]);   for i: =1 to n do if b4[i]< min then begin min: =b4[i];                                                           n: =i;                                                 end;   write (min,' ',n); end.   блок  схему не прикрепить, извини.

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