В 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 z;
Uses crt;
Var a,n,i,sum, pro:integer;
Begin
Sum:=0;
Pro:=1;
Writeln ('введите число a'); read (a);
Writeln('введите число n(>a)'); read (n);
For i:= a to n do
Begin
If odd(i) then
Begin
Sum:= sum+i;
Pro:= pro*i;
End;
End;
Writeln('sum=', sum);
Writeln('pro=', pro);
End.
8 Ячеек
B2|C2
B3|C3
B4|C4
B5|C5