Добавил:
ICK
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Курсовые по программированию / kurs01 / text1
.pas (* comment1 *)
{ comment2 }
const
a:real=10,5;
b,c,de:integer=6;
var
c1,c2:real;
c3:integer;
a:array[1..100] of integer;
function fun(a:real):integer;
function funky (a,b:real;cd,e:integer):real;
begin
read (a);
readln (a,bc,d);
for i:=0 to 10 do
a:=bc+d/a*4;
for b:=10 downto 1 do;
end.
{ comment2 }
const
a:real=10,5;
b,c,de:integer=6;
var
c1,c2:real;
c3:integer;
a:array[1..100] of integer;
function fun(a:real):integer;
function funky (a,b:real;cd,e:integer):real;
begin
read (a);
readln (a,bc,d);
for i:=0 to 10 do
a:=bc+d/a*4;
for b:=10 downto 1 do;
end.