Объяснение:
program XandY;
const
rndlim=50;
var
x, y : integer;
begin
x:=random(rndlim);
y:=random(rndlim);
Writeln('x=',x,' y=', y);
Writeln('x+y = ',x+y);
Writeln('x-y = ',x-y);
Writeln('x*y = ',x*y);
Writeln('x^2 + y^2 = ',sqr(x)+sqr(y));
end.
Запуск:
Free Pascal Compiler version 2.6.2-8 [2014/01/22] for x86_64
Copyright (c) 1993-2012 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling main.pas
Linking a.out
16 lines compiled, 0.2 sec
x=27 y=29
x+y = 56
x-y = -2
x*y = 783
x^2 + y^2 = 1570
Есептеуіш техника — есептеу және мәліметтерді өңдеу процессінің маңызды компоненті болып табылады. Есептеуге арналған алғашқы құрал ретінде есептеу таяқшаларын атауға болады, бұл құрал қазіргі кезде де бастауыш сынып оқушыларын есепке үйрету үшін қолданылады. Даму жолында бұл құралдар күрделене түсті (мысалы, финикиялық саз фигуралары).
Уақыт өте келе, қарапайым құрылғылардан күрделі құралдар пайда бола бастады: абак, логарифмдік сызғыш, механикалық арифмометр, электронды компьютер. Алғашқы есептеуіш құрылғылардың қарапайымдылығына қарамастан, олармен жұмыс жасауға үйренген адам, қазіргі заманғы калькуляторларды пайдаланғаннан да жылдам есептер жүргізе алады. Әрине, қазіргі заманғы есептеуіш құрылғыларының жұмыс өнімділігі және есептеу жылдамдығы ең жылдам есептегіш адамның өзін шаң қаптырып кетеі.
