70 likes | 241 Views
Задачі з складеною умовою. Задача 1. З’ясуйте, чи однакового кольору клітинки шахової дошки? 1 1 5 5 2 3 7 6 1 1 2 3. Один. 2 10. Один. 5 13. Два. 2 5. program p2; var a,b,c,d:integer; begin write (‘Vvedit koordynaty 1’); readln(a, b); write (‘Vvedit koordynaty 2’);
E N D
Задачі з складеною умовою НВК "Школа-гімназія "Сихівська"
Задача 1 • З’ясуйте, чи однакового кольору клітинки шахової дошки? • 1 1 • 5 5 • 2 3 • 7 6 • 1 1 • 2 3 Один 2 10 Один 5 13 Два 2 5 НВК "Школа-гімназія "Сихівська"
program p2; var a,b,c,d:integer; begin write (‘Vvedit koordynaty 1’); readln(a, b); write (‘Vvedit koordynaty 2’); readln(c, d); if ((a+b) mod 2)=((c+d) mod 2)then writeln (‘Odyn kolir’) else writeln (‘Dva kolory’); readln; end. НВК "Школа-гімназія "Сихівська"
Задача 2 • З’ясуйте, чи може пішак за один хід потрапити з клітинки з координатами (x1,y1) у клітинку з координатами (x2,y2). • Лише сусідні клітинки НВК "Школа-гімназія "Сихівська"
program p2; var x1,y1,x2,y2:integer; begin write (‘Vveditkoordynaty 1’); readln(x1,y1); write (‘Vveditkoordynaty 2’); readln(x2,y2); if (abs(x1-x2)=1) or (abs(y1-y2)=1) then writeln (‘Tak’) else writeln (‘Ni’); readln; end. НВК "Школа-гімназія "Сихівська"
Задача 3 • З’ясуйте, чи може шахова тура за один хід потрапити з клітинки з координатами (x1,y1) у клітинку з координатами (x2,y2). • Тура ходить тільки у горизонтальному або вертикальному напрямках НВК "Школа-гімназія "Сихівська"
program p3; var x1,y1,x2,y2:integer; begin write (‘Vvedit koordynaty 1’); readln(x1,y1); write (‘Vvedit koordynaty 2’); readln(x2,y2); if then writeln (‘Tak’) else writeln (‘Ni’); readln; end. НВК "Школа-гімназія "Сихівська"