перевести с языка паскаля на школьный алгоритмический язык

program n_4

var x, a, b, c, s: integer

writeln ('Нахождение суммы цифр трехзначного числа')

write (' Введите исходное число>>')

readln (x) ;

a :=x div 100;

b :=x mod 100 div 10;

c :=x mod 10;

s :=a+b+c;

writeln ('s= ' , s)

end

1 набор текста;

2 вырезание кусков текста, запоминание их в течении текущего сеанса работы, а также в виде отдельных файлов;

3 вставка кусков в нужное место текста;

4 замена слов одно на другое частично или полностью по всему тексту;

5 нахождение в тексте нужных слов или предложений;

6 форматирование текста, т.е. придание ему определенного вида по следующим параметрам: ширина текстовой колонки, абзац, поля с обеих сторон, верхнее и нижнее поле, расстояние между строками, выравнивание края строк;

7 автоматическая разбивка текста на страницы с заданным числом строк;

8 автоматическая нумерация страниц;

9 автоматический ввод подзаголовков в нижней или верхней части страницы;

10 выделение части текста жирным, наклонным или подчеркнутым шрифтом;

11 переключение программы для работы с другим алфавитом;

12 табуляция строк, т.е. создание постоянных интервалов для представления текста в виде колонок;

13 при вводе текста вы упираетесь в конец строки, Word автоматически делает переход на следующую строку;

14 если при вводе текста делается опечатка, функция автокоррекции автоматически ее исправляет. А функция автоматической проверки орфографии подчеркивает неправильно написанные слова красной волнистой линией, чтобы их было легче увидеть и исправить;

15 если пользоваться дефисами для выделения пунктов списка, употреблять дроби, знак торговой марки или другие специальные символы, функция автоформатирования будет сама их корректировать;

16 возможность вставки в текст формул, таблиц, рисунков;

17 возможность создания нескольких текстовых колонок на одной страницы;

18 выбор готовых стилей и шаблонов;

19 для представления текста в виде таблицы можно, конечно, пользоваться и табулятором, однако Microsoft Word предлагает гораздо более эффективные средства. А если таблица содержит цифровые данные, то их легко превратить в диаграмму;

20 режим предварительного просмотра позволяет увидеть документ в том виде, в каком он выйдет из печати. Кроме того, он дает возможность отобразить сразу все страницы, что удобно для внесения изменений перед распечаткой.

Var n, i, sum: integer; //Описание переменных Begin //Начло программы writeln ('Введите число'); //Диалог с пользователем readln(n); //Считывание числа sum := n; //Присваивание сумме значение самого числа (само число - уже делитель самого себя) writeln('Делители числа:'); //Диалог с пользователем for i := 1 to n div 2 do //Цикл For от до половины n if (n mod i) = 0 then begin //Если число делится на i, то выводим write(i,' '); sum := sum + i; //К значению суммы прибавляем делитель end; //Конец условного оператора if writeln(n); //Вывод самого числа, т.к. оно тоже делитель writeln('Сумма делителей: ',sum); //Вывод суммы делителей End.