Первое нужно выполнить СЛОЖЕНИЕ, второе ВЫЧИТАНИЕ, третье УМНОЖЕНИЕ, четвёртое ДЕЛЕНИЕ)
ГистограммыГрафикиКруговые диаграммыЛинейчатые диаграммыДиаграммы с областямиТочечные диаграммыБиржевые диаграммыПоверхностные диаграммыКольцевые диаграммыПузырьковые диаграммыЛепестковые диаграммы
Насколько была понятна запись
y= 15x+a; если x>=10; a<=-3;
у = x^(2)+ корень из а; если х<=9;а>5;
program zadacha;varx,y,a: real;
beginwriteln('vvedite x,a');readln(x,a);if (x>=10) and (a<=-3) then y:=15*x+a;if (x<=9) and (a>5) then y:=sqr(x)+sqrt(a);writeln(y);end.
Ответ :EАВДЖБГ
чтобы научиться решать эти задания , просто открой браузер , зайди на любой сайт и посмотри как выглядит ссылка в адресной строке , удачи!
Const n=15;
var
a:array[1..n]of integer;
i,i_max:integer;
begin
for i:=1 to n do
begin
a[i]:=random(4)+15;
writeln(a[i]);
end;
writeln;
for i:=1 to n do
write(a[i]:4);
writeln;
i_max:=1;
for i:=2 to n do
if a[i]>a[i_max]then
i_max:=i;
for i:=1 to n do
if a[i]mod 5=0 then
a[i]:=a[i_max];
for i:=1 to n do
write(a[i]:4);
<span> end.</span>