Results 1 to 18 of 18
Hybrid View
-
19th October 2010 15:08 #1Registered User
Join Date: Oct:2010
Location: Vidin
Posts: 8
! Pascal . :" : , , . , , ." . !
-
19th October 2010 21:31 #2
-
19th October 2010 22:56 #3
[k][4], k e ; .No + , ,
1)
ij, i:=1÷k,
j := 0÷4, No,
, .. 0÷k
, :
DVj:=Ai1
- DVj ,
- k, 3 . DVj DVi. 0 : DVi:=Ai0
"" , DVi 0÷k, . 0 , - labl, .
DVi labl-.
( Pascal) DV , 3- . label-a
- .
!" , , , , ."
-
20th October 2010 14:38 #4Registered User
Join Date: Oct:2010
Location: Vidin
Posts: 8
, , ! Pascal. .
-
22nd October 2010 00:22 #5
-
22nd October 2010 01:47 #6
-
22nd October 2010 10:51 #7
-
22nd October 2010 14:31 #8
-
22nd October 2010 14:46 #9
-
22nd October 2010 16:58 #10
-
22nd October 2010 17:18 #11
-
22nd October 2010 18:26 #12
-
22nd October 2010 19:51 #13
-
23rd October 2010 00:54 #14
-
25th October 2010 08:38 #15
-
25th October 2010 10:49 #16
, pos Pos - . - j . "", , . , ... - . .
, . : "50% ! !"
. - 10 , . , -. ? .
,.. / vbTheKing Kaspirotv
.
Fujistu Lifebook E756 | Core i7-6500U / 400MHz-3.1GHz | 8 GB DDR4-2133 | Samsung PM871 / 256 GB SSD | 15" 1920x1080 | Manjaro Linux + kernel 4.19
-
4th November 2010 00:07 #17Registered User
Join Date: Oct:2010
Location: Vidin
Posts: 8
. 28 ";" expected but "else" found. , 5 ...
type danni=real;
mas1=array [1..40,1..4] of danni;
mas2=array [1..40] of danni;
var i,j,br1,br2,m,n:integer;
A:mas1;
DV:mas2;
Begin
write ('zadaite broya na redovete:'); readln (m);
write ('zadaite broya na stalbovete:'); readln (n);
for i:=1 to m do
for j:= 1 to n do
begin
write ('zadaite elementa ot',i,' -i red i ',j,' -i stalb'); readln (A[i,j]);
end;
begin
br1:=0;
br2:=0;
for i:=1 to n do
j:=2;
begin {20}
if a[i,j]=2 then
begin
j:=j+1;
if a[i,j]=2 then
begin {25}
j:=j+1;
if a[i,j]=2 then dv[i]:=a[i,1];
else br2:=br2+1;
end;
else begin
if a[i,j]=2 then br2:=br2+1
else br1:=br1+1
end;
else br1=br1+1
end;
writeln ('1 dvoika-',br1,' ','2 dvoiki-',br2);
readln
end.
-
4th November 2010 00:31 #18




Reply With Quote




Lenovo ThinkPad 15 IdeaPad 15
5th May 2023, 22:16 in