program srednacifra;
var x,sr:integer;
begin
writeln('vnesete tricifren broj cija sredna cifra sakate da ja izdelite');
readln(x);
sr:=(x div 10) mod 10;
writeln(sr);
readln;
end.
ne mi go prifaka kodot a funkcionira. Isto kako i uste nekolku drugi zadaci koi lokalno funkcioniraat, no ne i otkako ke gi pratam. Ke ve zamolam za pomos :)
|