База ответов ИНТУИТ

Программирование на языке высокого уровня Паскаль

<<- Назад к вопросам

Дан фрагмент программы:
var Buf:array[1..100] of real;   f: file;begin  assign(f, 'bfile.dat'); reset(f, 30);  Blockread(f, Buf, 2); …    
Сколько байтов будет считано из файла?

(Отметьте один правильный вариант ответа.)

Варианты ответа
3000
2
200
30
60(Верный ответ)
100
Похожие вопросы
Дан фрагмент программы:
var Buf:array[1..100] of real;   f: file;begin  assign(f, 'bfile.dat'); reset(f, 30);  Blockread(f, Buf, 3); …    
Сколько байтов будет считано из файла?
Дан фрагмент программы:
var Buf:array[1..10] of single;   f: file;begin  assign(f, 'bfile.dat'); reset(f, 4);  Blockread(f, Buf, 5); …    
Сколько байтов будет считано из файла?
Дан фрагмент программы:
var Buf:array[1..20] of word;   f: file;begin  assign(f, 'bfile.dat'); reset(f, 6);  Blockread(f, Buf, 6); …    
Сколько байтов будет считано из файла?
Дан фрагмент программы:
var Buf:array[1..100] of integer;   f: file;begin  assign(f, 'bfile.dat'); reset(f, 10);  Blockread(f, Buf, 4); …    
Сколько байтов будет считано из файла?
Дан фрагмент программы:
var Buf:array[1..100] of integer;   f: file;begin  assign(f, 'bfile.dat'); reset(f, 10);  Blockread(f, Buf, 3); …    
Сколько байтов будет считано из файла?
Дан фрагмент программы:
var Buf:array[1..10] of single;   f: file;begin  assign(f, 'bfile.dat'); reset(f, 4);  Blockread(f, Buf, 2); …    
Сколько байтов будет считано из файла?
Дан фрагмент программы:
var Buf:array[1..20] of word;   f: file;begin  assign(f, 'bfile.dat'); reset(f, 6);  Blockread(f, Buf, 4); …    
Сколько байтов будет считано из файла?
Что будет выведено на экран в результате работы программы
var k:byte; x:real;    begin       k := 2; x := 1;       write ('*',   '*',x:4:1, k:k, '* *');    end.    
Что будет выведено на экран в результате работы программы
var k:byte; y:real;    begin       k := 4; y := 2;       write ('* *'  ,k, y:k:2,' *');    end.    
Что будет выведено на экран в результате работы программы
var k:integer; x:real;    begin       k := 2; x := 3;       write ('[',x:4:2, k,']');    end.