В магазин привезли n мешков с сахаром, вес которого указан в фунтах. Переведите вес каждого мешка в килограммы. Определите самый легкий мешок. (1 фунт = 453,592 грамма)

да и сам Pascal ABC уже много языков в себя вобрал.

С# (или то, во что он разовьется) через время практически убьет C++, затолкнув его в узенькую нишу - тогда вспомните эти слова. С - он останется. Для драйверов.

Тут "процентов 70" заданий, где нужен Паскаль, но об этом они забывают написать, подозревая, что других языков не существует))))

С# - язык, разработанный для виртуалки майкрософт, чтобы попытаться оживить ещё языков 5 от того же майкрософта. в итоге он работает их виртуальной машине. С - действительно для драйверов. С++ будет жить, потому что крупные игростройсекие компании типа Ubisoft или EA разрабатывают верхний уровень в своих играх на C++. к тому же, на плюсах можно писать под ардуино, а поскольку он популярен, можно надеяться на жизнь плюсов

ОК, надейтесь)))

#include <iostream>int main(){int n;float weight, lw = 0;const float ft = 0.453592; // kgstd::cout << "number of bags: ";std::cin >> n;for (int i = 0; i < n; i ++){std::cout << "weight is ";std::cin >> weight;std::cout << "in kg " << weight * ft << "";if (lw != 0 && weight < lw) lw = weight;else lw = weight;}std::cout << "the lightest bag is " << lw << " kg";}

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018Внимание! Если программа не работает, обновите версию!begin  var a:=ReadSeqReal(ReadInteger).Select(t->t*0.453592).ToArray;  a.Println; a.Min.Println;end.Пример1032.6 29.4 30.7 31 29.92 43.4 41.26 42 38.82 40.0514.7870992 13.3356048 13.9252744 14.061352 13.57147264 19.6858928 18.71520592 19.050864 17.60844144 18.166359613.3356048