Питання №4 ? Як відбувається виконання команди неповного розгалуження, якщо значення логічного виразу true?

а) виконується послідовність команд 1 і після цього виконується команда, наступна за розгалуженням

б) одразу виконується команда, наступна за розгалуженням

в) виконується послідовність команд 2 і після цього виконується команда, наступна за розгалуженням

г) виконується послідовність команд і після цього виконується команда, наступна за розгалуженням

Питання №5 ?

Як відбувається виконання команди неповного розгалуження, якщо значення логічного виразу false?

а) одразу виконується команда, наступна за розгалуженням

б) виконується послідовність команд і після цього виконується команда, наступна за розгалуженням

в) виконується послідовність команд 2 і після цього виконується команда, наступна за розгалуженням

г) виконується послідовність команд 1 і після цього виконується команда, наступна за розгалуженням

Питання №6 ?

Як описується алгоритмічна структура неповного розгалуження в мові програмування Free Pascal?

а)if <логічний вираз> then <команда>

б)if <логічний вираз> then <команда 1> else <команда 2>

в)відсутня правильна відповідь

г)If ….. then

👇

Увидеть ответ

Ответ:

ЯЯЯ1118526

07.07.2022

я тест ответы такие:

Объяснение:

1. неповного розгалуження

2. if <логічний вираз> then <команда>

3. виконується послідовність команд і після цього виконується команда, наступна за розгалуженням

4. одразу виконується команда, наступна за розгалуженням.

5. Повні і неповні

6. If A<5 Then A := A+1;

4,8(86 оценок)

Открыть все ответы

Ответ:

nikop65

07.07.2022

Uses crt,graphABC;
var a,m,n,j,i,x1,y1,x2,y2,x3,y3,x4,y4,kg,kv,p:integer;
    k:real;

procedure kvadrat;//рисование 1 квадрата
begin
setpencolor(clBlue);
moveto(x1,y1);
lineto(x2,y2);
lineto(x3,y3);
lineto(x4,y4);
lineto(x1,y1);
end;

begin
hidecursor;
repeat
write('Сторона квадрата от 20 до 100 a=');
read(a);
until a in [20..100];
repeat
writeln('Введите 2 числа для определения соотношени m<n:');
read(m,n);
until m<n;
clearwindow;
k:=m/n;//отношение
kg:=windowwidth div a+1; //кол. кв. по горизонтали
kv:=windowheight div a+1; //по вертикали
for j:=1 to kg do
for p:=1 to kv do
begin
for i:=1 to 50 do //рисуем 50 вложенных квадратов в 1 месте
   begin
    kvadrat;
    x1:=trunc(x1+(x2-x1)*k); y1:=trunc(y1+(y2-y1)*k);
    x2:=trunc(x2+(x3-x2)*k); y2:=trunc(y2+(y3-y2)*k);
    x3:=trunc(x3+(x4-x3)*k); y3:=trunc(y3+(y4-y3)*k);
    x4:=trunc(x4+(x1-x4)*k); y4:=trunc(y4+(y1-y4)*k);
   end;
x1:=a*(j-1); y1:=a*(p-1); //на новое место
x2:=a*j; y2:=a*(p-1);
x3:=a*j; y3:=a*p;
x4:=a*(j-1); y4:=a*p;
end;

end.

Втетради нарисовать орнамент из разноцветных прямоугольников, ромбов, квадратов, подготовить програм