Такое дело: на этой неделе экзамен намечаеться по паскалю. И я вроде бы всё разобрал, тока вот с массивами у меня каша выходит...с двумерными.
На экзамене типо должно быть задание такое: дана программа состоящая из двумерных массивов, и кучи циклов. И я должен нарисовать картинку которая получиться.
Подскажите какие нибудь примеры на которых можно потренироваться. Или же ссылку на сайт где есть такие задания.
И ещё такой вопрос: если у меня дана такая прога:
| Код | var i, j, k, m, s :integer;
label CASEPOINT;
begin
k:=17;
m:=k mod 3; //<-----эта запись означает что надо делить 17 на 3 без остатка?
CASEPOINT: case m of
2, 5 : begin m:=m+10; S:=0; goto CASEPOINT end; //<----- запись 2,5 означает что если у меня m не равно 2 или 5 то я пропускаю эту строчку?
1, 10: begin m:=m+15; S:=10; end; //<----- запись 1,10 означает что если у меня m не равно 1 или 10 то я пропускаю эту строчку?
else begin m:=m-2; goto CASEPOINT; end;
end;
writeln( 'm=', m, ' S=', S);
i:=10; S:=0;
for j:=1 to 5 do
begin
if i>5 then i:=i+2 else i:=i+1;
for k:=1 to 5 do
begin
i:=i+3;
S:=S-1;
end;
end;
writeln( 'i=', i, ' S=', S);
end. |
Я правильно всё понял? обьясните если нет...и если можно похожие задачки привидите. Хочу потренироваться. |
)
нужно найти количество прямоугольников в двумерном массиве