DSCN1062
for lc-1 to n do if(kdłv2)*2-kthen
f:"f*<k*EXP(2*x*x)/(2+*qrt(l+*qr(k)**qr(k)));
elsc
f:-f-<k*EXP(2*x*x))/ (2+sqrt(l+sqr(k)*sqr(k)));
writełn
readln;
cod.
Zad 5,
Narysować schemat blokowy do programu z zadania 4.
Zad 6.
Co zapamięta komputer realizując prezentowany program dla danych wprowadzanych z klawiatury w następującym porządku; 5,4.5.5,10,5,8,6,10.10,7 - (mapka pamięci)
Program zad6;
Var N,L:integer;
Roądln(N);
FOR L:=l TO H do Bogiń
lfritoln( 'boki') ;
Readln( A,B);
P^A*Bj
S?»S+P;
lad;
SP:-S/H ;
Writeln(sp:0:4);
Ind.
Wyszukiwarka
Podobne podstrony:
cp 55 will say—"It is unn.itur.il for mc to do this." Otbers will muttcr—“1 cannot brcathcDSC03227 4H6 Dodatek El:-TROK; FOR I:—1 TO H DO IF Y[I] >- EPS THEI BEGII S:-X[I]/T[I]S IF EX ORDSC03227 4H6 Dodatek El:-TROK; FOR I:—1 TO H DO IF Y[I] >- EPS THEI BEGII S:-X[I]/T[I]S IF EX ORALG23 Poznaj C++ w pięć minut! 323 j :=1; for i:—l to 5 do begin writeln(i*j); j:=j+l and; i: =1; whA nativity scene 2 COT 10. Make a tunic for Joseph. To do this. take c piece of fabric which is a liHomer ochrony osobiste USETHERIGHT PPE FOR THE JOB. DO YOU KNOW WHEN AND WHERE TO WEAR PPE?img171 171 12.1. Parsing ekspansywnych języków grafowych procedurę ExpRec (var rec); begin for i :=img171 171 12.1. Parsing ekspansywnych języków grafowych procedurę ExpRec (var rec); begin for i :=obraz0 (84) Analiza algorytmu Algorytm begin for i:= 1 to n do for j := 1 to n do begin end k:= I tProgram sekwencyjny begin for i:=l to n do read(a[k]); sort(1,n); for k:=l to n dozdj1 (6) Dobre rady Puste linie i odstępy for k:=1to8do for k:= 1 to 8 do Stosowanie sta tych constipe 07 How Much Time and How Many Exercises It is much better to do exercises for a short period eacwięcej podobnych podstron