Эссе на тему надежность пароля

var

x: real;

begin

readln(x);

writeln(round(x));

end.

февраль зимний месяц

май весенний месяц

август летний месяц 

сентябрь осенний месяц

var s: string;

begin s : = 'informatica'; writeln(s); writeln(copy(s, 3, 5)); writeln(copy(s, 6, 3)); writeln(copy(s, 8, 3)); writeln(copy(s, 8, 2) + s[5]); end.

самая крупная не летающая птица- страус эму