Наука о информационных технологиях
Наука о виртуальности
Наука о бесконечной скорости
Наука о математике с физикой
Наука которую невозможно понять
Если так подумать, то папка - это ярлык, который вмещает в себе различные файлы или ярлыки. А каталог - это список определенных отсортированных файлов или ярлыков, в магазине - отсортированный список продукции.
Var
price, prepay:integer;
begin
Write('Введите стоимость квартиры -> ');
Readln(Price);
Write('Введите предоплату за квартиру в процентах -> ');
Readln(prepay);
Case Prepay of
20:Writeln('Общая стоимость квартиры -> ', Price - Price * 0.05);
30:Writeln('Общая стоимость квартиры -> ', Price - Price * 0.06);
50:Writeln('Общая стоимость квартиры -> ', Price - Price * 0.08);
100:Writeln('Общая стоимость квартиры -> ', Price - Price * 0.1);
end;
end.
<u>Пример:</u>
Введите стоимость квартиры -> 1000000
Введите предоплату за квартиру в процентах -> 100
Общая стоимость квартиры -> 900000
Result := 3*x - Sin(x)*Sqr(Sin(x));