надо сделать следующее: составить программу, решающую следующую : дано трехзначное число. в нем зачеркнули первую цифру слева и приписали ее справа. вывести полученное число. так же: составить программу, решающую следующую : дан номер некоторого года (целое положительное число). определить соотв-щий ему номер столетия, учитывая, что, к примеру, началом 20го столетия был 1901 год. сам то я знаю как решать, но не смогу записать это в паскаль!
program l4;
var
n,k: integer;
begin
Writeln('Vvedi chislo');
readln(n);
k:=n div 100;
n:=n mod 100;
writeln(n,k);
end.