Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  jokjkj
Language: PASCAL
Code:
program helloworld;
var vett: array[1..12]of char;
var i:integer;
for i:=1 to 4 do
begin
writeln('inserisci una lettera');
writeln;
readln(vett[i]); 
end;

for i:=1 to 4 do
begin
write(vett[i]);

end;

end.
Comments: