3. напишите общий вид оператора «цикл с условием». 5. точно и четко сформулируйте условие , которая решается в данной программе: uses crt; var n : integer; s : byte; begin write('введите натуральное число: '); readln(n); s : = 0; while n < > 0 do begin s : = s + n mod 10; n : = n div 10 end; writeln('s = ', s : 4); end. 6. создайте программу на языке turbo pascal. 1) дано трехзначное число. найти сумму цифр этого числа. 2) найти четырехзначное число, которое при деление на 133 дает остаток 125.

3.  for i: =< число типа integer> to < число типа integer> do 5.  6.1. program z1; uses crt; var x,a,b,c,s: integer; begin writeln('введите 3-значное число: '); readln(x); a: =x div 100; b: =x mod 100 div 10; c: = x mod 10; s: =a+b+c; writeln(s); end. 6.2. program z1; uses crt; var  x,a,b,c,s: integer; begin

1. Цилиндр, конус и шар;
2. Конический хвостовик инструмента (сверло, зенкер, фреза, развёртка, зажимной патрон, электрод контактной сварки) и коническое отверстие соответствующего размера (гнездо) в шпинделе или задней бабке, например, токарного станка;
3. Сфера представляет собой совокупность информации, информационной инфраструктуры, субъектов, осуществляющих сбор, формирование, распространение и использование информации, а также системы регулирования возникающих при этом общественных отношений;
5.
1. Выбрать создание детали (Файл-->Создать-->Деталь).
2. Выбрать в дереве модели плоскость x-y.
3. Включить режим эскиз (кнопка панели управления ).
4. На геометрической панели построения выбрать ввод окружность.
5. Ввести параметры: координаты центра - 0,0; диаметр окружности - 35 мм.
6. Закончить редактирование эскиза (повторно нажать на кнопку «эскиз»).
7. На панели редактирования детали выбрать Операция выдавливания.
8. В окне Параметры на вкладке Операция выдавливания установить параметры: прямое направление; расстояние 50 мм (высота цилиндра)и нажать кнопку Создать.
9. На экране должно появиться изображение цилиндра.