using System;
namespace ConsoleApp5
{
class Program
{
static void Main(string[] args)
{
Console.Write("Сумма кредита - ");
var c = Convert.ToDouble(Console.ReadLine());
Console.Write("Процент - ");
var p = Convert.ToDouble(Console.ReadLine())/100;
Console.Write("Годовой доход - ");
var r = Convert.ToDouble(Console.ReadLine());
if (r <= c * p) Console.WriteLine("Рассчитаться за кредит невозможно.");
else
Console.WriteLine($"Кол-во лет для погашения - {c / (r - c * p):0.##}");
Console.ReadKey();
}
}
}
var a,k:real;
n:integer;
begin
readln(a,n);
k:=a;
while n<>1 do begin
n:=n-1;
a:=a*k;
end;
writeln(a);
end.
PascalABC.Net
var
str : string;
i : integer;
begin
write('Введите строку: ');
readln(str);
for i := 1 to length(str) do
case str[i] of
'а' : str[i] := 'б';
'А' : str[i] := 'Б';
'б' : str[i] := 'а';
'Б' : str[i] := 'А';
end;
writeln(str);
end.
Не знаю паскаль, знаю C++ :)
{
int a, b;
//вводим значения в a и в b (в футах)
cin >> a >> b;
b = b*45;
if (a>b) cout << "В км больше";
else cout >> "В футах больше";
}
{
// тут важен дробный тип
dooble a, b;
//вводим значения в a и в b (м/c)
cin >> a >> b;
a = a:3.6;
if (a>b) cout << "В км/ч больше";
else cout >> "В м/с больше";
}
ну а дальше надо уже все по формулам смотреть.
{
doouble a,b;
//вводим значения в a и в b стороны
cin >> a >> b;
a=a*a*3.14;
b=b*b;
if(a>b) cout << "Площадь круга больше";
else cout << "Площадь квадрата больше";
}
4. не знаю как такое делать, что значит уместиться ли круг в квадрате? Уместится если радиус его меньше чем половина стороны.
5.
{
doouble a,b,c,d;
cin >> a >> b >>c >>d; // вводим объем и массу;
a = a/b;
c = c/d;
if(a>c) cout << "Тело 1 имеет плотность больше чем тело 2";
else cout << "тело 2 имеет большую плотность";
}
6. не знаю. Но тоже как-то через форумулы.
<span>Домашні тварини живуть з людиною, яка їх утримує, надаючи їм житло і їжу. Домашні тварини приносять людині користь, або як джерело матеріальних благ і послуг, або як друзі, що скрашують його дозвілля. Більшість домашніх тварин легко розмножуються. Проводячи штучний відбір, людина може контролювати розмноження домашніх тварин і ознаки, які вони передають своєму потомству. Домашні тварини можуть міститися в спеціальних приміщеннях (скотний двір, стайня, собача будка), але можуть жити і безпосередньо в будинку людини. З тих тварин, які живуть в будинку, одних містять в клітинах, акваріумах, тераріумах і інших "будиночках", а іншим (наприклад, кішкам, собакам, кроликам і навіть мавпам) дозволяють вільно переміщатися по приміщенню.
</span>
<span>Если помог, жми "Спасибо"</span>