Паскаль тіліндегі программа фрагменті берілген. Дұрыс фрагментті білгілеу if a<=b Then writeln (‘c мәнін есептеу’); C:=ln(a-b)/sqrt(a-b); Else d:=cos(sqr(x))-2*sqrt(x); Writeln (c,d);
Паскаль тілінде жазылған программа орындағаннан кейінгі n=5 болғандағы s-тің мəні 14
Паскаль тіліндегі программа фрагменті берілген. Дұрыс фрагментті табыңыз program a3 Var n. m. x.e.y:integer; Begin Write(‘m, n сандарын енгізіңдер:’); Readln(m, n); x:=m; y:=n; while x<>y do If x>y then x:=x-y else y:=y-x; e:=x; writeln(‘Ең үлкен ортақ бөлгіш=’, e); end.
Паскаль тіліндегі программа фрагменті берілген. Қателердің саны
