Пять лет назад был принят закон о защите персональных данных... Но для ого что бы оформить человека на работу, необходимы его(как мимнимум) паспорт и код. Без разрешения эти данные невозможно использовать. Как следствие, данные идут туда, куда ВЫ их подаете.
Нахождение наибольшего числа из заданных трех.
___________________________________________
Var a:byte;
begin
write('a - ');
readln(a);
writeln(a div 100);
writeln((a div 10)mod 10);
writeln(a mod 10);
readln
end.
У китайцев направления не лево право, а стороны света, с учетом того, что они производят почти всю электронику, можно предположить, что это от них пошло
Program pr;
uses crt;
Var a, b, c, y:real;
Begin
Writeln('Введите a, b, c');
readln(a, b, c);
y:=exp(3*ln(b))+sqrt(c)-sqrt(a);
Writeln('y=', y);
readln;
end.