1. Проанализируйте работу программы.
program math;
var x, y: integer;
begin
x:=1;
y:=1
while x<7 do
begin
y:=y*2;
x:=x+1
end;
end.
ответьте на во Сколько раз исполнится тело цикла?
2) Какое значение примет x после завершения программы?
3) Какое значение примет y после завершения программы?
4) Сколько раз исполнится тело цикла, если изменить условие на x<=7?
5) Сколько раз исполнится тело цикла, если изменить условие на x>7?
6) Сколько раз исполнится тело цикла, если изменить условие на x>0?
7) Что произойдет, если из тела цикла убрать команду x:=x+1?
8) Сколько раз исполнится тело цикла, если изменить команду x:=x+1 на x:=x+2?
9) Сколько раз исполнится тело цикла, если изменить команду x:=x+1 на x:=x+2?
Const
n=15;
Var
ar:array[1..n] of integer;
pro,i,k:uint64;
begin
randomize;
pro:=1;
writeln('First array:');
for i:=1 to n do
begin
ar[i]:=random(22,23); //Серьёно?
write(ar[i]:4);
pro:=pro*ar[i];
end;
writeln;
writeln('Pro=',pro);
write('Enter value:');
readln(k);
writeln('Final array:');
for i:=1 to n do
begin
ar[i]:=ar[i]+k;
write(ar[i]:6);
end;
end.
Пример работы программы:
First array:
23 23 22 22 22 22 23 23 23 22 23 22 22 23 23
Pro=10868183115618730368
Enter value:3
Final array:
26 26 25 25 25 25 26 26 26 25 26 25 25 26 26
// delete.cpp: определяет точку входа для консольного приложения.//
#include "stdafx.h"#include "iostream"#include <conio.h>
using namespace std;
int count_ = 0;
char m[6][6] = { {'S', '.', '.', '.', '#', '#'}, { '#', '.', '#', '.', '.', '.' }, { '.', '.', '#', '.', '.', '#' }, { '.', '.', '#', '#', '#', '.' }, { '#', '.', '.', '.', '#', '#' }, { '#', '#', '#', '.', '.', 'F' }};
int find_p(int x, int y) { if (x < 0 || x > 5 || y < 0 || y > 5) return 0; if (m[y][x] == 'F') return 1; if (m[y][x] != '.' && m[y][x] != 'S') return 0; m[y][x] = '+'; count_++; if (find_p(x, y - 1)) return 1; if (find_p(x + 1, y)) return 1; if (find_p(x, y + 1)) return 1; if (find_p(x - 1, y)) return 1; m[y][x] = 'x'; return 0;}
int main(){ find_p(0, 0); cout << count_; //вывод _getch(); // задержка return 0;}