-
Boomburum АВТОР15 дек 05Так, 1.7.25 делать не надо, если только блок-схему. Друг решил, респект ему!!!
program pr_1_7_25;
procedure podschety(x : integer);
var
a : real;
begin
a := ln(1+x) — 0.95*sin(x) + 6/7 — x;
write(a:2:4);
readln;
end;
var
x : integer;
begin
write('Enter x: ');
readln(x);
podschety(x);
end. -
Boomburum АВТОР15 дек 05Народ, мне это к завтру делать надо :( Да, все говорят что задачи легкие, что паскаль — для яслей, но для меня, человека ни разу не запускавшего TP — это песдец :( Кому-то хтмл ну никак не дается, когда первый раз садятся. А я так же могу сказать что это легче простого, т.к. увлекаюсь...
Сделано с
NoNaMe