Опубликовано 5 лет назад по предмету Информатика от Аккаунт удален

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

Ответ

Ответ дан Disaczar

#include <iostream>

int main(){
int n;
float weight, lw = 0;
const float ft = 0.453592; // kg
std::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 << "n";
if (lw != 0 && weight < lw) lw = weight;
else lw = weight;
}
std::cout << "the lightest bag is " << lw << " kgn";
}
Ответ

Ответ дан Аккаунт удален

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.

Пример
10
32.6 29.4 30.7 31 29.92 43.4 41.26 42 38.82 40.05
14.7870992 13.3356048 13.9252744 14.061352 13.57147264 19.6858928 18.71520592 19.050864 17.60844144 18.1663596
13.3356048
1. Ответ
  
  Ответ дан Disaczar
  
  да и сам Pascal ABC уже много языков в себя вобрал.
2. Ответ
  
  Ответ дан Аккаунт удален
  
  С# (или то, во что он разовьется) через время практически убьет C++, затолкнув его в узенькую нишу - тогда вспомните эти слова. С - он останется. Для драйверов.
3. Ответ
  
  Ответ дан Аккаунт удален
  
  Тут "процентов 70" заданий, где нужен Паскаль, но об этом они забывают написать, подозревая, что других языков не существует))))
4. Ответ
  
  Ответ дан Disaczar
  
  С# - язык, разработанный для виртуалки майкрософт, чтобы попытаться оживить ещё языков 5 от того же майкрософта. в итоге он работает их виртуальной машине. С - действительно для драйверов. С++ будет жить, потому что крупные игростройсекие компании типа Ubisoft или EA разрабатывают верхний уровень в своих играх на C++. к тому же, на плюсах можно писать под ардуино, а поскольку он популярен, можно надеяться на жизнь плюсов
5. Ответ
  
  Ответ дан Аккаунт удален
  
  ОК, надейтесь)))

Самые новые вопросы

Математика - 5 лет назад

Решите уравнения: а) 15 4 ∕19 + x + 3 17∕19 = 21 2∕19; б) 6,7x - 5,21 = 9,54

Помогите решить задачи на паскаль.1) дан массив случайных чисел (количество элементов вводите с клавиатуры). найти произведение всех элементов массива.2) дан массив случайных чисел (количество элементов вводите с клавиатуры). найти сумму четных элементов массива.3) дан массив случайных чисел (количество элементов вводите с клавиатуры). найти максимальный элемент массива.4) дан массив случайных чисел (количество элементов вводите с клавиатуры). найти максимальный элемент массива среди элементов, кратных 3.

География - 5 лет назад

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

Математика - 5 лет назад

Чему равно: 1*(умножить)х? 0*х?

Русский язык - 5 лет назад

В каком из предложений пропущена одна (только одна!) запятая?1.она снова умолкла, точно некий внутренний голос приказал ей замолчать и посмотрела в зал. 2.и он понял: вот что неожиданно пришло к нему, и теперь останется с ним, и уже никогда его не покинет. 3.и оба мы немножко удовлетворим свое любопытство.4.впрочем, он и сам только еле передвигал ноги, а тело его совсем застыло и было холодное, как камень. 5.по небу потянулись облака, и луна померкла.

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

Информация