Указать результат вычисления. Программа на языке Паскаль :
PROGRAM USL ;
CONST X = 10 ;
VAR Y : INTEGER ;
BEGIN
IF X>0 THEN Y : = 1 ;
IF X<0 THEN Y := -1 ELSE Y := 0;
WRITE (Y) ;
END. 0
Указать результат вычисления. Программа на языке Паскаль :
PROGRAM USL ;
CONST A = 2 ;
VAR C : INTEGER ;
BEGIN
IF A>0 THEN C := 2*A ;
IF A<0 THEN C := A ELSE C := 0;
WRITE (C) ;
END 0
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PRIM ;
VAR X , Y , : INTEGER ;
BEGIN
X := 1 ; Y := 0 ;
WHILE X <= 3 DO
BEGIN
Y = Y+X ; X = X+1 ;
END;
WRITE(Y)
END. 2
Что вычисляет программа. Программа на языке Паскаль :
PROGRAM PRIM ;
VAR M : REAL ; I : INTEGER ;
A : ARRAY[1..10] OF REAL ;
begin
FOR I := 1 TO 10 DO READ(A[I]) ;
M := A[1] ;
FOR I := 2 TO 10 DO BEGIN
IF A[I] >M THEN M := A[I] ;
END ;
WRITE(M)
END.максимальный элемент массива
Что вычисляет программа. Программа на языке Паскаль :
PROGRAM SUM ;
VAR I , J : INTEGER ; S : REAL ;
A : ARRAY[1..5,1..5] OF REAL ;
BEGIN
FOR I := 1 TO 5 DO BEGIN S:=0;
FOR J := 1 TO 5 DO BEGIN READ(A[I,J]) ;
S := S+A[I , J]
END ; WRITE(S)
END
END. сумму элементов каждой строки
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM GW ;
VAR I , K : REAL ;
BEGIN READ(K) ;
I := K+2/3K ;
WRITE(I)
END.4
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM BIG ;
CONST A = 2.0 ;
VAR J : REAL ;
BEGIN
J := 2.0*SQR(A)+3.0*SQRT(A) ;
WRITE(J)
END.ошибок нет
Вставьте пропущенную строку. Программа на языке Паскаль :
PROGRAM PRIM ;
CONST X = 1.7 ;
?
BEGIN
Z := SIN(SQRT(X*X-9.0)+LN(X+1.0) ;
WRITE(Z)
END.VAR Z: REAL;
Указать результат вычисления. Программа на языке Паскаль :
PROGRAM PRIM ;
CONST A = 12 ; B = 3 ;
VAR X , Y : REAL ;
BEGIN
READ(X , Y) ;
X := SQRT(A-B) / 1.5 ;
Y := SQRT(SQR(X) -3*X+6) ;
WRITE(Y)
END.2
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PRIM ;
CONST A = 1.25 ; B = -3 ;
VAR X , Z : REAL ;
BEGIN
X := (SQR(A) - B) / SQRT(A) ;
IF X > 0 THEN Z := SIN(X+1);
IF X < 0 THEN Z := COS(X+1);
IF X = 0 THEN Z := 0 ;
WRITE(Z)
END.ошибок нет
Укажите правильную запись. Программа на языке Паскаль :
IF X > 0 THEN Z := A*(X*X) ;
IF X := 0 THEN Z := A+B ;
IF X < 0 THEN Z := 2X ;
IF X > 0 THEN Z < X+2 ;
IF X >= 0 THEN Z = SIN(X) 1
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PRIM ;
Var X , z : real ;
BEGIN X := 2.0 ; Z := 0 ;
WHILE X < 22.0 DO
LABEL 20.0 ;
Z := SQR(X) - SQRT(X) ;
X := X+0.2 ;
END ;
WRITE(Z)
END.5
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PRIM ;
VAR Z : REAL ; I ; INTEGER ;
A : ARRAY[1..10] : REAL ;
BEGIN Z := 0 ;
FOR I := 1 TO 10 DO READ(A[I]) ;
FOR I := 1 TO 10 DO BEGIN
Z := Z+A[I] ;END ;
WRITE(Z)
END.2
Сколько раз переменной С будет присвоено значение. Программа на языке Паскаль :
PROGRAM SID ;
VAR Z : REAL ; I : INTEGER ;
X , A : ARRAY[1..10] OF REAL ;
BEGIN C := 0 ;
FOR I := 1 TO 10 DO
READ(X[I] , A[I]) ;
FOR I := 1 TO 10 DO
BEGIN
C := X[I]+A[I] ;
WRITE(C) ;
END
END.11
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PRIM ;
VAR I , J : INTEGER ;
A , B , C : ARRAY(1..10,1..10 ) OF REAL ;
BEGIN
FOR I := 1 TO 10 DO BEGIN
FOR J := 1 TO 10 DO BEGIN
READ(A[I , J] , B[I , J] , C[I , J]) ;
C[I , J] := A[I , J]+B[I , J] ;
WRITE(C[I , J]) ;
END ;
END
END.3
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PRIM ;
CONST A = 2.1 ; B = 9.8 ;
Var X , y : real ;
BEGIN
X = (A+B) / 2
Y := 2.0*X+A ;
WRITE(Z)
END.5
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PRIM ;
VAR A , B , Y : REAL ;
BEGIN
READ(A , B) ;
Y = A+B ;
WRITE(Y)
END.5
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM READ ;
VAR A , B , Y : REAL ;
BEGIN
READ(A , B) ;
Y := A*B ;
WRITE(Y)
END.1
Вычислить значение Y. Программа на языке Паскаль :
PROGRAM PRIM ;
CONST T = 2.1 ; X = 2.9 ;
VAR X , F : REAL ;
BEGIN F := 10 ;
F := X+T ; Y := F / 5.0 ;
WRITE(Y)
END.1
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PR ;
CONST X = 12.0 ;
VAR A , Y : REAL ;
BEGIN A := LN(X) ;
Y := SQRT(A)+X ;
WRITE(A)
END. Ошибок нет
В какой строке описываются переменные. Программа на языке Паскаль :
PROGRAM PR ;
CONST A = 4.3 ; B = 2.4 ;
Var X , z : real ;
BEGIN X := SQRT(A)+B ;
Z := X+A+SQRT(B) ;
WRITE(Z)
END.3
Какой результат выдаст программа. Программа на языке Паскаль :
PROGRAM PRIM ;
CONST X = 4.0 ;
VAR Y : REAL ;
BEGIN
IF X > 0 THEN Y := SQR(X) ;
IF X < 0 THEN Y := 1 / X ;
WRITE(Y)
END.16
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PR ;
CONST X = 4 ;
VAR Z : INTEGER ;
IF X > 5 THEN Z := 2*X ;
IF X < 5 THEN Z := SQR(X) ;
WRITE(Z)
END.4
В какой строке ошибка. Программа на языке Паскаль :
PROGRAM PR ;
VAR B , Y , Z : REAL ;
BEGIN READ(B , Y) ;
IF B - Y := 0 THEN Z := 0
ELSE Z := LN(B - Y) ;
WRITE(Z)
END.4
Сколько целых чисел напечатает программа. Программа на языке Паскаль :
PROGRAM PRIM ;
CONST K = 10 ;
VAR N : INTEGER ;
BEGIN N := 0 ;
REPEAT N := N+1 ;
WRITE(N) UNTIL N > K
END.11
Что вычисляет программа. Программа на языке Паскаль :
PROGRAM PRIM ;
VAR X , F , Z : REAL ;
BEGIN Z := 0 ; X := 3 ;
WHILE X <= 23.0 DO
BEGIN F := SQR(X)+COS(X) ;
Z := Z+F ; X := X+0.2 ;
END;
WRITE(Z)
END.сумму значений функции
В какой строке массив описан правильно. Программа на языке Паскаль :
A : ARRAY[1..10] REAL ;
A : ARRAY[1..10] OF REAL ;
A : ARRAY(1..10) OF REAL ;
A : ARRAY[1..10] ; 2
Укажите номер строки, в которой допущена ошибка. Программа на языке Паскаль :
PROGRAM LNM ;
CONST PI = 3.14 ;
VAR : A , B OF REAL ;
BEGIN READ(B) ;
A := B+PI ;
WRITE(A)
END.3
Укажите правильно записанную строку вычисления выражения :
X=(A+B)(D+C)2+AD . Программа на языке ПаскальX := (A+B)*SQR(D+C)+A*SQRT(D) ;
Укажите номер строки, в которой допущена ошибка. Программа на языке Паскаль :
PROGRAM PAS ;
VAR B , D : REAL ;
BEGIN
READ B ;
D := B+SQR(B) ;
WRITE(D)
END.4
В какой строке описываются постоянные. Программа на языке Паскаль:
PROGRAM PRIM ;
CONST KN = 10 ; BM = 0.15 ;
VAR N , M , K : INTEGER ;
LABEL 2,4 ;.....2
Какую функцию вычисляет программа :
PROGRAM PRIM ;