ASCII in Pascal programming

[uidemy]

A message encryption system that translates message characters to its ASCII equivalent.
Please i need help on the above question.
<<Email address removed by moderator. Communicate in the threads of via PM. Never post your email address.>>

 

[rgd1101]

take to your teacher/professor.

 

[Alabalcho]

It seems like a homework.
- show us how you think to approach the problem (eg what encryption algorithm you are going to implement)
- show us how far you went with the implementation

 

[uidemy]

I don't know the encryption algorithm to use but, this is my work so far...

Program Youmi;
uses crt;
var
message: string[255];
asciival:array[1..255] of byte;
i: integer;

Procedure Getdecimi

begin
writeln('Enter you message');readln(message);
For i:= 1 to length (message) do
asciival:=(ord(message));
end.

Please am new to programming and am not get the encryption syntax right.

 

[Alabalcho]

- there is no "encryption syntax" right. You have to invent your own way of encoding your message (eg replace each letter with next one in the alphabet)
- your "FOR" loops looks almost right, but the content is not. You have to "index" the content of "message" and "asciival" appropriately, like in "asciival := encrypt(message);
- "ord" returns integer, while "asciival" element are chars