Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

С клавиатуры вводится натуральное число К. затем последовательно вводятся К чисел с плавающей точкой,не превышающей 10. Найти сумму этих чисел и наименьшее из них
программа на паскале

Ответ оставил Гость

Var g:array[1..100] of integer;var k,i:integer;min,s:integer;beginreadln(k);for i:=1 to k dobeginreadln(g[i]);write(g[i]:3);end;writeln;s:=0; min:=10;for i:=1 to k dos:=s+g[i];for i:=1 to k dobeginif (minend.