writeln(y); end.
* 8
Hisob natijasini aniqlang?
begin
a:=12; b:=14; c:=10; if (a>b) or (b>c)
then y:=a+b-c else y:=a-b+c;
writeln(y); end.
* 16
Quydagi programma nimani chop
etadi?. VAR X,Y: REAL; BEGIN
X:=25; Y:=SQRT(SQR(X));
Y:=X-Y;
WRITE(Y) END.
* 0
PASKAL-programmaning ishlashi
natijasida nima hisoblanadi? program
m1; var x,y,z: real; begin read(x,y,z); if
x
write(exp(3*ln(abs(x)))) end.
* x , u , z sonlarning kattasining kubi;
Quydagi ifoda a=5, b=15, c=2 bo’lsa
qanday natija beradi? ( a+ b div c * 4 )
mod 5 div 3
* 1
Operasiyalar natijasini to`g`ri tanlang.
round(trunc(-5,875) +0.8)+5
* -1
Operasiyalar bajarilganda j ni
qiymatini tugri tanlang. j:= round
(frac(3,875))*5 +4
* 9
@Official_AKT
telegram kanali
@Official_AKT 14 telegram kanali
Do'stlaringiz bilan baham: |