A=1
b=7
c=7
d=b^2-4*z*c
if d>0 then x1=(-b-sqr(d))/2*a:x2=(-b+sqr(d))/2*a:Print x1,x2
if d=0 then x=-b/2*a:Print x
if d<0 then Print "Нет решения"
Вот это просто алгоритм можно сказать а на каком языке вы хотите
Название пошло от английского слова Shape. Перевод означает фигуру илианимацию<span> геометрических фигур. Хорошо выполненные </span>анимации<span> не оставляют зрителя равнодушным, увлекая его гипнотически в происходящее. Простые фигуры, случайно появляясь из ниоткуда, также исчезая — трансформируются друг в друга.</span>
Прикладная программа или приложение — программа , предназначенная для выполнения определенных пользовательских задач и рассчитанная на непосредственное взаимодействие с пользователем. Которыми может пользоваться любые люди, которые используют ПК.
Задача 14
Система счисления 10-ая
а-показывает сколько разрядов в числе (их 3 по условию вывода)
в - это произведение цифр в числе оно равно 0 по условию
Наибольшее число из трех разрядов и произведении цифр в числе =0
Это 990
Задача 15
Аналогично
L - это количество разрядов в числе, их три по условию
М=М+x mod 10 - это сумма цифр в числе она равна 7
число состоит из трех разрядов и мин. сумма равна 7
Это 106
Задача 16
L=3 количество цифр в числе( разрядов) по условию
сумма четных цифр в числе равна 8, причем число наименьшее
Это 108
Const n=(задайте нужное количество элементов массива);
var a: array [1..n] of integer;
i: byte; sum: integer;
begin
sum :=0;
for i:=1 to n do
begin
write('a[',i,']= '); readln(a[i]);
if a[i] mod 2=0 then sum:=sum+a[i];
end;
writeln;
write(sum);
readln;
end.
