Дано 4-х значное число. Вывести число, полученное перестановкой цифр тысяч и десятков. Например: 4321=2341. Срочно!!! Программа Паскаль. Даю 50 баллов!!!
var
x: integer;
begin
x:=4321;
writeln (((x mod 100) div 10)*1000 + ((x mod 1000) div 100)*100+(x div 1000)*10 + x mod 10)
end.
Пишет Встречено 'writeln', а ожидалось ';'
Можешь сказать как исправить?
А, все исправил. Спасибо тебе огромное