а) 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.
Людина, яку я поважаю і на яку хочу бути схожим,— це моя мама. Вона завжди добра, ласкава. Моя мама дає мені хороші поради. І, часом, коли мами немає вдома і ні з ким поділитися своїм горем чи радістю, в мене ніби камінь на душі. Але, коли приходить мама, то горе, розділене з нею, — півгоря, а радість — подвійна радість.
Інколи, буває мама насварить мене за погану оцінку в школі або ще за якусь шкоду — я ображаюсь і, буває, навіть не розмовляю. Але частіше я буваю неправий. А коли розумію це, йду до мами і пере мама мене завжди вибачає, як би я не провинився.
Одного разу я уявив, що мами немає. Як тоді склалося б моє життя? Про це страшно навіть подумати. І я зробив висновок, що мама — це все: і радість, і доброта, і розуміння, і розрада, і все-все на цьому світі.
Я хочу бачити свою маму завжди щасливою, радісною, ніжною і доброю. А інакше не може й бути.
тест прошел проверку, пользуемся)