Исправьте ошибку в лабораторной работе

@Skeezmo · Регистрация: 01.06.2019

Студворк — интернет-сервис помощи студентам

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
Var
hx,x,x0,p,x1,F,i,n:real;
k,n:integer;
begin
Write('Введите x0='); //1
Read(x0);
Write('Введите hx='); //1
Read(hx);
Write('Введите xn='); //4
Read(xn);
Writeln('x0=',x0,' hx=',hx,' xn=',xn);
x:=x0;
repeat
p:=0;
x1:=1;
t:=0;
while x<xn do
begin
if x1 mod 2=0 then begin
P:=(x*1.5);
F:=P; 
for i:=2 to P do
begin
F:=F*i;
P:=F;
Writeln ('P='',F,');
end;
x:=x+hx;
end
else
begin
P:=(x*2);
F:=P;
begin 
for i:=2 to P do
F:=F*i;
P:=F;
Writeln ('P='',F,');
end;
x:=x+hx;
end;
end;
end.

Вообщем , выдает ошибку в 43 строчке " Встречено 'end', а ожидалось ';' " , пробовал сидеть и думать - не помогло. Решил обратиться на форум. Помогите бестолковому студенту , пожалуйста.
Само задание:

Также , если не сложно проинформируйте , в правильном векторе ли я пытаюсь выполнить задачу?

@Пс · 23.06.2019, 19:56

Skeezmo )

@Skeezmo · 23.06.2019, 19:57 **[ТС]**

Буст в доте нужен?) 5500 ммр какникак

Добавлено через 1 минуту
Ну все братикша , я пошел. Еще раз спасибо.

@Пс · 23.06.2019, 19:59

Skeezmo,

Сообщение от Skeezmo

Буст в доте нужен?)

спасибо за предложение,я не играю в доту)

Сообщение от Skeezmo

Ну все братикша , я пошел. Еще раз спасибо.

не за что))

Новые блоги и статьи Все статьи Все блоги /
сукцессия 33. открытые вопросы от клауде anaschu 19.07.2026 "Что накопилось за эту часть А — тринадцать правок, из которых шесть пришли из ваших вопросов и каждая оказалась реальной ошибкой, а не калибровкой: односторонний симбиоз, отсутствующий листопад,. . .	32 сукцессия anaschu 19.07.2026 сукцессия 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не «подкручивает» сходимость —. . .	сукцессия 31: модель микоризы - это модель ещё нескольких явлений, социальных и экономических anaschu 18.07.2026 Теория «Всего»: апдейт v1. 1. 2 — 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не. . .	сукцессия 30. Массив проверяющих друг друга моделей anaschu 18.07.2026 Архитектура сети взаимопроверяющих моделей микоризной сукцессии (v2. 0) Развитие тензорного ОДУ-ядра и создание кросс-платформенного калибровочного полигона Уважаемые коллеги! В продолжение. . .
Грибы - это женщины, деревья - это мужчины. Анти инь янь для союза мужчины и женщины. anaschu 18.07.2026 ГЛАВНЫЙ НАУЧНО-ФИЛОСОФСКИЙ ВЫВОД: Сексуально-Репродуктивный Капитализм против Государства Моногамии Коллеги, мы вышли на финишную прямую 20-мерного ОДУ-моделирования вековой сукцессии (ветка. . .	Текстовый слайдер с нумерацией страниц и кроссбраузерность. russiannick 18.07.2026 Один мой друг написал текстовый слайдер с нумерацией страниц. Сегодня я расскажу как он умудрился подружить его с кроссбраузерностью. Очевидно сложно угодить с шириной каждому браузеру. Один крадет. . .	Грибы - это мемы, дерево - это человек. Применение микоризной модели к теории меметики Докинза. anaschu 18.07.2026 Меметический изоморфизм теории «всего»: Грибная сукцессия как модель эволюции идей Докинза Базовый код системы ОДУ микоризной сукцессии описывает не просто биологию, а универсальную. . .	Грибы - это корпорации, деревья - это государства. Механизм массонского захвата власти anaschu 18.07.2026 Макроэкономический изоморфизм теории «всего»: Грибная сукцессия как модель транснационального капитализма Базовый код системы ОДУ микоризной сукцессии описывает не просто биологию, а. . .

@Пс 257 / 149 / 70 Регистрация: 29.07.2018 Сообщений: 1,254
	23.06.2019, 19:56
	Сообщение было отмечено Skeezmo как решение Решение Skeezmo ) 1

@Skeezmo 0 / 0 / 0 Регистрация: 01.06.2019 Сообщений: 27
	23.06.2019, 19:57 [ТС]
	Буст в доте нужен?) 5500 ммр какникак Добавлено через 1 минуту Ну все братикша , я пошел. Еще раз спасибо. 0

Исправьте ошибку в лабораторной работе

Решение