Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
сумму чисел один,два,три,четыре,пять разделить на разность чисел 10 и 7.равно пяти.
разделим монеты на кучки 1002 1002 и одна монета
1-е взвешивание сравниваем 1002 и 1002
если они одинаковые то они настоящие и значит осталось сравнить одну монету с какой-нибудь из этих кучек и выяснить тяжелее она или легче
если одна из куч тяжелее то ее делим пополам и снова взвешиваем
если половинки оказались одинаковые, значит они настоящие и фальшивая монета легче настоящей, а если разные то фальшивая монета тяжелее настоящей
program e8;
var a, b, c, v: real;
begin
writeln('введите значения длины, ширины,высоты');
readln(a,b,c);
v: =a*b*c;
writeln('v=', v: 4: 2);
readln;
end.
поскольку язык не указан пишу в том который мне удобнее
def temp-table wares no-undo
field ware as char
field cost as dec extent 13
field infl as dec.
def var i as int.
def var infl as dec.
input from data.txt.
repeat:
create wares.
import wares.
input close.
do i = 2 to 13:
infl=random(0.0005, 0.02).
for each wares :
wares.cost[i]=wares.cost[i-1]*(1+infl).
Популярные вопросы