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.

kato99    2   25.08.2019 20:10    1