Сборник задач по программированию. Старая версия

 

 Приходько А. Н.

 

сервер, файл, pascal, объяснения, образование, функция, обзоры, ответы, xslt, file, преобразование
 

Паскаль. P.10. Гнездо задач. Вложенность операторов For-For

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.1    Ответы    Java-аналог    Visual Basic-аналог

Определить, какие числа будет выдавать на экран дисплея следующая программа.


program Pr;
var
    k, n : integer;
begin
    for k:=1 to 2 do
        for n:=4 to 5 do begin
            write(k);
            write(' ');
            writeln(n);
        end;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.2    Ответы    Java-аналог    Visual Basic-аналог

Определить, какие числа будет выдавать на экран дисплея следующая программа.


program Pr;
var
    k, n : integer;
begin
    for k:=1 to 3 do
        for n:=4 to 5 do begin
            write(k);
            write(' ');
            writeln(n);
        end;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.3    Ответы    Java-аналог    Visual Basic-аналог

Определить, какие числа будет выдавать на экран дисплея следующая программа.


program Pr;
var
    k, n : integer;
begin
    for k:=1 to 2 do
        for n:=1 to 2 do begin
            write(k);
            write(' ');
            writeln(n);
        end;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.4    Ответы    Java-аналог    Visual Basic-аналог

Определить, какие числа будет выдавать на экран дисплея следующая программа.


program Pr;
var
    k, n : integer;
begin
    for k:=1 to 2 do
        for n:=1 to 3 do begin
            write(k);
            write(' ');
            writeln(n);
        end;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.5    Ответы    Java-аналог    Visual Basic-аналог

Определить, какие числа будет выдавать на экран дисплея следующая программа.


program Pr;
var
    k, n : integer;
begin
    for k:=1 to 3 do
        for n:=4 to 6 do begin
            write(k);
            write(' ');
            writeln(n);
        end;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.6    Ответы    Java-аналог    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j : integer;
begin
    xx:=0;
    for i:=1 to 2 do
        for j:=i+1 to i+2 do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.7    Ответы    Java-аналог    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j, k : integer;
begin
    xx:=0;
    for i:=1 to 2 do
        for j:=i+1 to i+2 do
            for k:=j+1 to j+2 do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.8    Ответы    Java-аналог    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j, k : integer;
begin
    xx:=0;
    for i:=1 to 2 do
        for j:=1 to i+1 do
            for k:=1 to j+1 do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.9    Ответы    Java-аналог    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j : integer;
begin
    xx:=0;
    for i:=1 to 4 do
        for j:=1 to 2 do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.10    Ответы    Java-аналог    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j : integer;
begin
    xx:=0;
    for i:=5 to 9 do
        for j:=i-1 to i+1 do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.11    Ответы    Java-аналог    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j : integer;
begin
    xx:=0;
    for i:=100 to 105 do
        for j:=i-50 to 60 do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.12    Ответы    Java-аналог    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j, k : integer;
begin
    xx:=0;
    for i:=1 to 3 do begin
        j:=2*i-1;
        for k:=i to j do xx:=xx+1;
    end;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.13    Ответы    Java-аналог    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j, k : integer;
begin
    xx:=0;
    for i:=1 to 5 do
        for j:=3 to 10-i do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.14    Ответы    Java-аналог    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j, k : integer;
begin
    xx:=0;
    for i:=1 to 4 do
        for j:=i to 7 do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.15    Ответы    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j, k : integer;
begin
    xx:=0;
    for i:=1 to 2 do
        for j:=1 to 3 do
            for k:=1 to 4 do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.16    Ответы    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i : integer;
begin
    xx:=0;
    for i:=1 to 2 do xx:=xx+1;
    for i:=1 to 5 do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.17    Ответы    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j, k : integer;
begin
    xx:=0;
    for i:=3 to 5 do begin
        j:=i*2-3;
        for k:=1 to j do xx:=xx+1;
    end;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.18    Ответы    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j, k : integer;
begin
    xx:=0;
    for i:=1 to 3 do begin
        j:=i*3-2;
        for k:=1 to j do xx:=xx+1;
    end;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.19    Ответы    Visual Basic-аналог

Определить, что будет в переменной xx после выполнения следующей программы.


Program AA;
var
    xx, i, j, k : integer;
begin
    xx:=0;
    for i:=1 to 3 do
        for j:=4 to 5 do
            for k:=i to j do xx:=xx+1;
end.

 

 

Калькулятор

/ - деление

\ - остаток

S - сумма чисел от и до

P - произведение чисел от и до

P.10.20    Ответы    Visual Basic-аналог

Определить, какое значение будет в переменной Sorry в конце выполнения следующей программы.


Program AA;
type
    QQ = (qq1, qq2, qq3, qq4, qq5, qq6, qq7, qq8, qq9);
    RR = (qq1 .. qq7);
    OO = (qq5 .. qq9);
var
    Sorry : QQ;
    RX : RR;
    OX : OO;
begin
    Sorry:=qq1;
    for RX:=qq1 to qq2 do
        for OX:=qq5 to qq7 do Sorry:=succ(Sorry)
end.

 

©   Александр Приходько    1996 - 2006