FORUM
Pagina de start a forumului eggzit.3xforum.ro
|
Nou pe simpatie:
Alexanndra1994 la Simpatie.ro
 | Femeie
24 ani
Bucuresti
cauta Barbat
24 - 43 ani |
|
|
FORUMReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
 eggzitUsername: 6R9PKQUKKU
Postari: 215
|
|
{sa se afiseze toate punctele care au coordonatele
nr intregi aflate in int patratului a carui diag
este data de punctele a(x,y) si b(z,t)}
program douazecitrei;
var x,y,z,t:real;
a,b,c,d,i,j:integer;
begin
write('x=');readln(x);
write('y=');readln(y);
write('z=');readln(z);
write('t=');readln(t);
a:=trunc(x)+1;
if trunc(z)<>z then b:=trunc(z) else b:=trunc(z)-1;
c:=trunc(y)+1;
if trunc(t)<>t then d:=trunc(t) else d:=trunc(t)-1;
for i:= a to b do
for j:=c to d do
writeln('(',i,',',j,')');
readln;
end.
|
|
| |
|