Var
a,b,c:integer;
begin
writeln("в каком году был основан город Минск ?");
writeln("<span>в 1067 году, в 1993 году, в 1147 году. В ответе просто число.</span>");
readln(a);
if a = 1067 then writeln("верно")
else writeln("Ошибка")
Нет это только с интернетом
Вообще то варианты некоректны. Вы должны использовать скобки вместе с апострофами, именно апострафами, а не кавычками, т.е. все должно выглядить,например, так
Writeln('Всего было ', а,' символов');
Т.е. на экран выведиться следущее, если а получилось равно 98
Всего было 98 символов
0.927 гигабайт. с такой скоростью была передача информаци по сети