program Bear;
var
N: Real;
begin
Write ('Введите массу медвежонка: ');
ReadLn (N);
WriteLn ('Масса белого медведя = ', N / 0.15:10:3);
ReadLn;
end.
program everyone;
var
N, L, D: Real;
begin
Write ('Введите количество часов: ');
ReadLn (N);
Write ('Введите ширину: ');
ReadLn (L);
D := N * 12 / L;
WriteLn ('Количество ткани = ', D:10:2);
ReadLn;
end.
Объяснение:
по задаче с ситцем: если за 5 минут делается 1 кв.м., то за час сделается 60 / 5 = 12 кв.м.
под количеством ткани, видимо имеется в ввиду длина полотна
длина будет равна: D := N * 12 / L, где
N - часы
L - ширина полотна
Написано на языке C++.
Я проверил свой код. Он работает правильно!
#include <iostream>
using namespace std;
int main()
{
float a, b, c, y, use1, use2, use3, uset;
cout << "Введите значение a: " << endl;
cin >> a;
cout << "Введите значение b: " << endl;
cin >> b;
cout << "Введите значение c: " << endl;
cin >> c;
use1 = 5 * a * b * c;
use2 = b *= b;
use3 = c *= c;
uset = use2 / use3;
y = use1 + uset + b;
cout << "Результат: " << y << endl;
return 0;
}