[РЕШЕНО][Pascal] Сайт моего универа не принимает мое решение в простой задаче

[Starkkkkk]

Добрый день. Я новичок в этом. Сайт универа не принимает мой алгоритм (пишет неверное решение).

Что неверно?

Пример ввода:
longint
char
string

Пример вывода:
s1 : string;
s2 : longint;
s3 : char;

Мое решение:

program p1;
var s1, s2, s3:string;
begin
read (s1, s2, s3);
writeln ('s1',' ',':',' ',s3,';');
writeln ('s2',' ',':',' ',s1,';');
writeln ('s3',' ',':',' ',s2,';');
end.

Решение в сообщении ниже

[Serge_Bliznykov]

А как полностью сформулировано задание? что дано и в чём состоит задача?


А пока мне не нравится в вашем решении использование оператора read
он не подходит в данном случае.

тогда уже так:

readln(s1);
readln(s2);
readln(s3);

[Starkkkkk]

Все получилось. Спасибо!