ответы:
1) 4 раза
2) 5 раз
Поскольку цикл зависит от переменной x разберём только её:
1. x = 1 проверяем условие цикла 1 < 5 (да) цикл запускается х = 2
2. x = 2 проверяем условие цикла 2 < 5 (да) цикл запускается х = 3
3. x = 3 проверяем условие цикла 3 < 5 (да) цикл запускается х = 4
4. x = 4 проверяем условие цикла 4 < 5 (да) цикл запускается х = 5
5. x = 5 проверяем условие цикла 5 < 5 (нет) цикл не запускается
Следовательно цикл исполнится 4 раза.
При изменении условий на x <= 5
1. x = 1 проверяем условие цикла 1 <= 5 (да) цикл запускается х = 2
2. x = 2 проверяем условие цикла 2 <= 5 (да) цикл запускается х = 3
3. x = 3 проверяем условие цикла 3 <= 5 (да) цикл запускается х = 4
4. x = 4 проверяем условие цикла 4 <= 5 (да) цикл запускается х = 5
5. x = 5 проверяем условие цикла 5 <= 5 (да) цикл запускается х = 6
6. x = 6 проверяем условие цикла 6 <= 5 (нет) цикл не запускается
Следовательно цикл исполнится 5 раз.
1)program p1;
var m,n: integer;
begin
write('вводите число: '); readln(n);
if n> =100 then
begin
m: = n mod 10;
writeln('последняя цира: ',m);
m: =n div 10 mod 10;
writeln('предпоследняя цира: ',m);
end;
end.
2)program p2;
var t1,t2,t3,d1,d2,d3,v1,v2,v3: integer;
vsr: real;
begin
write('вводите время езды(ч): '); readln(t1,t2,t3);
write('вводите скорость(км/ч): '); readln(v1,v2,v3);
d1: =v1*t1;
d2: =v2*t2;
d3: =v3*t3;
vsr: =(d1+d2+d3)/(t1+t2+t3);
writeln('средяя скорость= ',vsr: 1: 2,'км/ч');
end.