Блок схему к "Вычислите творенье чисел от 6 до 11, используя

Блок схему к "Вычислите произведение чисел от 6 до 11, используя цикол WHILE и For.Pascal..

Задать свой вопрос
1 ответ

begin  writeln('введите целое число');  readln( a ); x:=a;  s:=0;  while ( xlt;gt;0 ) do  begin    s := s + (x mod 10);    x := x div 10;  end; - скелет программки
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт