Найдите сумму элементов в массиве (3,5 ; 18.3 - вопрос №35183285150186577753 от lizaant 23.02.2023 00:55

Question

Информатика: Найдите сумму элементов в массиве (3,5 ; 18.3 ; 28,5 ; 1,5 ; 0,18) напишите программу на pascal.

lizaant · Answer

// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

begin
var a:=Arr(3.5,18.3,28.5,1.5,0.18); a.Println;
Writeln('S=',a.Sum)
end.

Результат
3.5 18.3 28.5 1.5 0.18
S=51.98