Версия для печати темы

Автор: Starkkkkk 4.09.2017 20:32

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

Что неверно?

Пример ввода:
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.

Автор: Федосеев Павел 4.09.2017 23:54

Приведите исходную постановку задачи, т.к. непонятно, почему порядок ввода не совпадает с порядком вывода.

Автор: Starkkkkk 5.09.2017 0:07

Цитата(Федосеев Павел @ 4.09.2017 23:54)

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