FORUM
Pagina de start a forumului eggzit.3xforum.ro
|
Nou pe simpatie:
morena28 pe Simpatie.ro
 | Femeie
25 ani
Bistrita Nasaud
cauta Barbat
27 - 52 ani |
|
|
FORUMReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
 eggzitUsername: 6R9PKQUKKU
Postari: 215
|
|
{elevii unei clase sunt aranjati pe n randuri
si m coloane. numele elevilor sa se afisele de pe
fiecare rand elevul care numele cel mai lung}
program doinoua;
var a:array[1..10,1..10] of string;
i,j,n,m:integer;
max:string;
begin
write('n='); readln(n);
write('m='); readln(m);
for i:=1 to n do
for j:=1 to m do begin
write('a[',i,',',j,']=');
readln(a[i,j]); end;
for i:=1 to n do begin
max:='';
for j:=1 to m do if length(a[i,j])>length(max)
then
max:=a[i,j];
writeln(max);
end;readln;end.
|
|
| |
|