bezpalova2013
?>

Необходима блок-схема цикла к постусловием. Задано целое положительное значение x (x>0 Вычислить сумму всех целых чисел, попадающих в интервал [;].

Информатика

Ответы

Tatyana1426

Program lol;

 Var x, sum, a, b:integer;

begin

 readln(x);

 a := round(int(sqrt(x))) + 1;

 b := round(x*x);

 for var i := a to b do

   sum := sum + i;

 writeln(sum);

end.

Объяснение:


Необходима блок-схема цикла к постусловием. Задано целое положительное значение x (x>0). Вычислит

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Необходима блок-схема цикла к постусловием. Задано целое положительное значение x (x>0 Вычислить сумму всех целых чисел, попадающих в интервал [;].
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

ИгоревичАндрей
natakrechko
Алексей Шуклин
moidela87
spodobnyi
Nasteona1994
vrn3314
sveta300856729
girra
a96849926288
Batishcheva
ooo-krasa
Segyn1218
Galkin Vladimirovich729
axo4937
▲