Uses crt;
const n=12;
var m:array[1..n] of integer;
k,s,i:integer;
begin
randomize;
for i:=1 to n do
begin
m[i]:=random(9)+1;
writeln(m[i]);
if m[i] mod 2<>0 then begin inc(k); s:=s+m[i]; end;
end;
writeln;
writeln(k);
writeln(s);
end.
Ответ:
Отяаьщшърь беняй, ш фцхый эюьхтпнщ.
Яэьгпнацщяш, сн эьхсыь. Тьа ьы, эюцпнщ!
Эьщбхынчшн - ъыцщ ятош ъбсютдьъ
Ц хныьяецпь фснщ ынрюс ц эьгпнщ
ьяанщйыиг ътеанщ хняьоьл птяац,
Н ьыу ътыш янъц яоцщц я эбац.
(это только часть стиха)
Объяснение:
А=Н Б=О это не сложно но долго. После составления ключ-таблицы мы шифруем стих
Неверный ответ 1102, так как двочная система состоит из чисел 1 и 0
<u>алг </u>
<u>нач</u>
вещ <em>x</em>, <em>y</em>
ввод <em>x </em>
<em>y</em> := (1 - <em>x</em> ** 2 + 5 * <em>x</em> ** 4) ** 2
вывод <em>y</em>
<u>кон</u>