ПЕРВЫЙ НОМЕР С РЕШЕНИЕМ И С МОРФЕМАМИ

1
var 
i: byte := 1; 
sum: integer := 0;
begin 
//Предусловие 
writeln('*** Цикл с предусловием ***'); 
while i <= 100 do 
begin   
sum := sum + i;   
inc(i); 
end; 
writeln('Сумма = ', sum:5); 
//Постусловие 
sum := 0; i := 1; 
writeln('*** Цикл с постусловием ***'); 
repeat   
sum := sum + i;   
inc(i); 
until i > 100; 
writeln('Сумма = ', sum:5); 
//Счетчик 
sum := 0; 
writeln('*** Счетчик ***'); 
for i := 1 to 100 do sum := sum + i; 
writeln('Сумма = ', sum:5);
end.

2
var 
N: integer; 
i: integer := 1; 
sum: integer := 0;
begin 
write('Введите N: '); 
readln(N); 
//Предусловие 
writeln('*** Цикл с предусловием ***'); 
while i <= n do 
begin   
sum := sum + i;   
inc(i); 
end; 
writeln('Сумма = ', sum:5); 
//Постусловие 
sum := 0; i := 1; 
writeln('*** Цикл с постусловием ***'); 
repeat   
sum := sum + i;   
inc(i); 
until i > N; 
writeln('Сумма = ', sum:5); 
//Счетчик 
sum := 0; 
writeln('*** Счетчик ***'); 
for i := 1 to N do sum := sum + i; 
writeln('Сумма = ', sum:5);
end.

What time does Maxim get up? — В какое время Максим встает?
He gets up at seven o’clock. — Он встает в семь часов.
What time do you go to school? — Когда ты ходишь в школу?
1. I go to school at half past eight. — Я хожу в школу в половине девятого.
What time does Dasha have lunch? — В какое время Даша обедает?
2. Dasha/She has lunch at twelve o’clock. — Даша / Она обедает в двенадцать часов.
What time does Nikita go to bed? — В какое время Никита ложится спать?
3. Nikita/He goes to bed at ten o’clock. — Никита / Он ложится спать в десять часов.