Вариант 1 1.по какой команде будет выведено значение величины х? 1)readln(x); 2)read (x); 3)write( 'x' ); 4)write(x). 2.найдите синтаксические ошибки в программе: program pr; var a,b.c: real; begin write 'введите два числа ; read a,b; c=a/b*0,01 wrire ('c=,c'); end. 3.какое значение пример переменная z после выполнения команд: z: =0; x: =-1; y: =-1; if x> 0 then z: =1 else z: =2; 1)2; 2)-1; 3)1; 4)0; 5) ни один из ответов 1-4 не верен. 4.какое логическое выражение нужно вписать во фрагмент программы,определяющий минимальный элемент массива f[1..n]? x: =f[1]; for k: =1 to n do x: =f[k]; 1)f[k]=f[k-1]; 3)f[k]< 0; 4)k< =n; 2)ни один из ответов 1-4 не верен 5.чему было равно значение переменной у,если после выполнения операций i: =10; while i < > 1 do begin y: =y*y; i: =int ( i / 2 ); end; оно стало равным 256? 1) 2; 2) -2; 3) 0; 4) 2 или -2; 5) ни один из ответов 1-4 не верен. 6.что будет выведено на печать в результате выполнения следующих операторов : а: ='5'; b: =-5; write (pred (a), succ (a), 'b=', 10+b); 1)'4' '6' b=5; 2) 64b = 10+b; 3)46b=5; 4)64b=5; 5) ни один из ответов 1-4 не верен. 7.что будет выведено на печать в результате выполнения следующих операторов: а: =1; repeat a: =а+1; write ('a=',a); until a=4; 1)a=2a=3a=4a=5a ; 2) a=2a=3a=4 ; 3)а=4 ; 4) а=3 ; 5) ни один из ответов 1-4 не верен.
2 исправленное
Var a,b,c: real;
write ('введите два числа') ;
read (a,b);
c:=a/b*0,01;
wrire ('c=',c);
3 1
4 1
5 4
6 3
7 2