zad2
k: = 25;
for i := 1 to (k mod 7) do write('*');
Wyszukiwarka
Podobne podstrony:
for i := 1 to 2*rozmiar+l do write(); textcolor(lightgray); end; {wyswietl_k razek) proced
img106 106 8. Metody probabilistyczne begin for i := 1 to numclass do fun[i] := log ( density(i, obj
zdj4 (5) Dobre rady Rozmieszczanie instrukcji, akapity a:=14: for i:=1 to 10 do begin x[i]:=0; h:=i
57 (278) var Liczba, I : Integer; begin Liczba 0; for I :-1 to 1000 do if not Odd (T[I]> the
26289 zdj4 (5) Dobre rady Rozmieszczanie instrukcji, akapity a:=14: for i:=1 to 10 do begin x[i]:=0
26289 zdj4 (5) Dobre rady Rozmieszczanie instrukcji, akapity a:=14: for i:=1 to 10 do begin x[i]:=0
DSCN7012 (2) ttc 25 wszystko to przemawiało do Goszczy ńs k i ego jegJ silniej, niż do tylu innych w
30 (552) begin Write ( Podaj liczbę: ); Readln (N); Silnia 1; for I 1 to N do Silnia Silnia *
89417 zdj3 (4) Praktyczne sposoby optymalizacji Ograniczanie liczby pętli for i := 1 to n do write(
Homer 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 :=
IMG25 fPvtanie 22Drgania mechaniczne ogólne są to < a) przenikające do organiz
skanuj0059(1) Write the names of two countries for each continent. Do każdego kontynentu dopisz nazw
obraz0 (84) Analiza algorytmu Algorytm begin for i:= 1 to n do for j := 1 to n do begin end k:= I t
Program sekwencyjny begin for i:=l to n do read(a[k]); sort(1,n); for k:=l to n do
więcej podobnych podstron