а) uses crt; var c,d: integer; s: real; beginwrite('введите число с: '); readln(c); write('введите число d: '); readln(d); s: =(power(c,3)+power(d,3))/2; writeln('полусумма кубов равна ',s: 5: 3); end.б) uses crt; var a,x1,x2,x3,x4,s: integer; beginwrite('введите четырёхзначное число: '); readln(a); x1: =a div 1000; x2: = a-1000*x1; x2: =x2 div 100; x3: =a-1000*x1-100*x2; x3: =x3 div 10; x4: =a-1000*x1-100*x2-10*x3; s: =x1*x2*x3*x4; writeln('произведение всех цифр в числе ',a,' равно ',s); end.
ответ:
ми вже всі давно чули такий вислів "роби добро і біжи". але мало, хто задумувався, чому саме так? коли ти зробиш добре діло, то його обов'язково помітять, але не всі скажуть та похвалять. тому не треба засмучуватися, бо все одно хтось це підхватить. і ви вже будете ініціатором цієї справи. а коли робиш погане діло, то вже зрозуміло що буде багато сварок та обурень. ви погіршите настрій перш за всього собі та навколишньому середовищі. тому завжди думайте, які наслідки будуть після ваших справ!
Поделитесь своими знаниями, ответьте на вопрос: