var a, b, с : integer;begin a := 0; b :=

Var a, b, с : integer;
begin
a := 0; b := 0; с := 0;
while 2 * a lt; 200 do begin
b := b + 3;
c := c - 1;
a := a + b + c
end;
write(a - 10)
end.ЧТО ПОЛУЧИТСЯ В ОТВЕТЕ??????СРОЧНО,ПОЖАЛУЙСТА,ПОМОГИТЕ!!!!

Задать свой вопрос
1 ответ
Ответ, приобретенный в Pascal ABC: 100.
Данька Невешкин
Громадное СПАСИБО,ВЫ МОЙ Спасатель!!!!!!!
Лилия Вревская
Не за что=).
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт