В 6:00 я просыпаюсь и делаю процедуры - умываюсь, моюсь, чищу зубы.
В 6:30 я делаю зарядку и так далее.
6:40 завтрак
7:00 собираюсь в школу
7:30 выходу из дома
8:00 начинаются уроки
14:00 заканчиваются уроки
14:15 прихожу домой
14:30 обедаю
15:00 - 17:00 занимаюсь уроками
17:30 иду на рисование
19:00 прихожу домой
20:00 ужинаю
21:00 провожу процедуры
22:00 ложусь спать
Программа отдельно вычисляет произведения строк и столбцов заданных ячеек.
Program n1;
Uses CRT;
Const n=10;
Var a: array[1..n,1..n] of integer;
i,j,x1,x2,y1,y2: integer;
p1,p2,p3,p4: longint;
begin
ClrScr;
For i:=1 to n do
begin
For j:=1 to n do
begin
a[i,j]:=random(10);
a[i,j]:=a[i,j]+1;
write(a[i,j]:3);
end;
writeln;
end;
Writeln('Vvedite pervyu paru koordinat');
Readln(x1,y1);
Writeln('Vvedite vtoruu paru koordinat');
Readln(x2,y2);
p1:=1; p2:=1; p3:=1; p4:=1;
For i:=1 to n do
begin
p1:=p1*a[i,y1];
p2:=p2*a[i,y2];
end;
For i:=1 to n do
begin
p3:=p3*a[x1,j];
p4:=p4*a[x2,j];
end;
Writeln('Proizvedenie strok = ',p1*p2);
Writeln('Proizvedenie stolbcov = ',p3*p4);
readln
end.
Первая гиря - 1 кг, это достаточно очевидно.
Вторая гиря - 3 кг, с её помощью можно получить следующие веса:
2 кг = 3 кг - 1 кг (на одну чашу ставим 3 кг, на вторую 1 кг плюс товар)
3 кг = 3 кг
4 кг = 3 кг + 1 кг
Дальше нам нужно 9 кг:
5 кг = 9 кг - 3 кг - 1 кг
6 кг = 9 кг - 3 кг
7 кг = 9 кг + 1 кг - 3 кг
... ... ...
13 кг = 9 кг + 3 кг + 1 кг
Последняя гиря - это 27 кг (чтобы в сумме получалось 40 кг).
Ответ: 1, 3, 9, 27.
A) 2,4,6
B) 2 - хостином выделяется именно место на компьютерах, именнующихся серверами.
Readln(n);
If (n>0)
write (n*n);
else
weite(0);
Видимо, 0 нельзя вводить?