// Известно, что Х кг шоколадных конфет стоит А рублей, // а Y кг ирисок стоит В рублей. Определить, сколько стоит 1 кг // шоколадных конфет, 1 кг ирисок, а также во сколько раз шоколадные конфеты дороже ирисок.
var x,y,a,b: real; begin writeln('Введите массу шоколадных конфет'); readln (x); writeln('Введите сумму потраченную на покупку шоколадных конфет'); readln (a); writeln('Введите массу ирисок'); readln (y); writeln('Введите сумму потраченную на покупку ирисок'); readln (b); writeln ('килограмм шоколадных конфет стоит ',(a/x):0:2,' рублей');//(a/x):0:2 - округряем до сотых) writeln ('килограмм ирисок стоит ',(b/y):0:2,' рублей'); Writeln ('Шоколадные конфеты дороже ирисок в ',(a/x)/(b/y):0:1,' раз');// - округляем результат до десятых end.
//Дана длина ребра куба а. Найти его объем и площадь поверхности
Var a: real; begin writeln ('введите длину ребра куба'); readln (a); while a<0 do begin writeln ('вы ввели не допустимое значение попробуйте еще раз'); writeln ('введите длину ребра куба'); readln (a); end; writeln ('площадь куба равна ',a*a*6); writeln ('объем куба равен ',a*a*a); end.
fuel -= fuel_cons * distance_a_b; // Емкость бака = емкость бака - расход топлива на 1 км * расстояние из пункта А в пункт В (узнаем количеств оставшегося топлива)
}
int distance_b_c, weight_b; // Создание целочисленных переменных:
distance_b_c - расстояние из пункта В в пункт Сweight_b - вес груза в пункте В
cout << "Погрузка/Разгрузка в точке B: "; // Вывод сообщения в консоль
cin >> weight_b; // Ввод с клавиатуры веса груза в пункте В
weight_a += weight_b; // Выясняем, на сколько был дозагружен/разгружен самолет в пункте В (Вес в пункте А + Вес в пункте В)
fuel_cons = fuel_consumption(weight_a); // Переменной fuel_cons присваиваем возвращаемое значение из функции fuel_consumption (расход топлива на 1 км)
cout << "Расстояние от пункта B в пункт C (км): "; // Вывод сообщения в консоль
cin >> distance_b_c; // Ввод с клавиатуры расстояния из пункта В в пункт С
fuel = (distance_b_c * fuel_cons - fuel); // Выясняем, на сколько необходимо дозаправить самолет, чтобы долететь до пункта С (Емкость бака = расстояние из пункта В в пункт С * расход на 1 км - емкость бака)
cout << "В пункте B самолет необходимо дозаправить на минимум (л): "; // Вывод сообщения в консоль
// а Y кг ирисок стоит В рублей. Определить, сколько стоит 1 кг
// шоколадных конфет, 1 кг ирисок, а также во сколько раз шоколадные конфеты дороже ирисок.
var x,y,a,b: real;
begin
writeln('Введите массу шоколадных конфет');
readln (x);
writeln('Введите сумму потраченную на покупку шоколадных конфет');
readln (a);
writeln('Введите массу ирисок');
readln (y);
writeln('Введите сумму потраченную на покупку ирисок');
readln (b);
writeln ('килограмм шоколадных конфет стоит ',(a/x):0:2,' рублей');//(a/x):0:2 - округряем до сотых)
writeln ('килограмм ирисок стоит ',(b/y):0:2,' рублей');
Writeln ('Шоколадные конфеты дороже ирисок в ',(a/x)/(b/y):0:1,' раз');// - округляем результат до десятых
end.
//Дана длина ребра куба а. Найти его объем и площадь поверхности
Var a: real;
begin
writeln ('введите длину ребра куба');
readln (a);
while a<0 do
begin
writeln ('вы ввели не допустимое значение попробуйте еще раз');
writeln ('введите длину ребра куба');
readln (a);
end;
writeln ('площадь куба равна ',a*a*6);
writeln ('объем куба равен ',a*a*a);
end.
return 1; // Конец программы с кодом ошибки
}
else // Иначе
{
fuel -= fuel_cons * distance_a_b; // Емкость бака = емкость бака - расход топлива на 1 км * расстояние из пункта А в пункт В (узнаем количеств оставшегося топлива)
}
int distance_b_c, weight_b; // Создание целочисленных переменных:
distance_b_c - расстояние из пункта В в пункт Сweight_b - вес груза в пункте Вcout << "Погрузка/Разгрузка в точке B: "; // Вывод сообщения в консоль
cin >> weight_b; // Ввод с клавиатуры веса груза в пункте В
weight_a += weight_b; // Выясняем, на сколько был дозагружен/разгружен самолет в пункте В (Вес в пункте А + Вес в пункте В)
fuel_cons = fuel_consumption(weight_a); // Переменной fuel_cons присваиваем возвращаемое значение из функции fuel_consumption (расход топлива на 1 км)
cout << "Расстояние от пункта B в пункт C (км): "; // Вывод сообщения в консоль
cin >> distance_b_c; // Ввод с клавиатуры расстояния из пункта В в пункт С
fuel = (distance_b_c * fuel_cons - fuel); // Выясняем, на сколько необходимо дозаправить самолет, чтобы долететь до пункта С (Емкость бака = расстояние из пункта В в пункт С * расход на 1 км - емкость бака)
cout << "В пункте B самолет необходимо дозаправить на минимум (л): "; // Вывод сообщения в консоль
cout << fuel; // Вывод значения переменной fuel
}