Var a,b,x:real;
begin
write('Введите a,b'); readln(a,b);
writeln('Уравнение: ',a,'x^2 + ',b,'x = 0');
x:=-b/a;
writeln('Корни уравнения: х=0 x=',x<span>);
</span>end.
Jhfdjhegfjksfdsfdjkbgnbdkrngd/skfjns/rkjgnskdrbjhkdrhdtyjftukyuj
Переставьте местами строчки вниз и пока слева стена местами
var
s,p:int64;
i,kol,m:integer;
a:array of integer;
begin
readln(kol);
s:=0;
p:=0;
m:=0;
setlength(a,kol);
for i := 1 to kol do
begin
read(a[i]);
s:=s+a[i];
p:=p*a[i];
end;
m:=s div kol;
writeln('Сумма ',s);
writeln('Произведение',p);
writeln('Среднее значение',m);
end.
Ответ:
"Везде исследуйте всечасно что есть велико и прекрасно"
Объяснение:
Это решается с помощью шифра Цезаря. В задании обозначено, что буква "Д" соответствует букве "Я" закодированного сообщения.
Буква "Д" в алфавите по счёту пятая, буква "Я" - тридцать третья. (см. картинку 1). Это значит, что <em>сдвиг</em> будет воспроизводиться на шесть
Следовательно, получается фраза, данная мной в ответе (см. картинку 2)