ХЕЛП НАПИШИТЕ ТОЧНУЮ ФОРМУЛИРОВКУ ЗАДАЧИ
program ex_4;
var i, n: byte; k: integer; a: array[1..120] of integer;
begin . '
randomize;
write('сколько элементов в массиве? '); readln(n);
write('введите заданное число k: '); readln(k);
for i := 1 to n do
begin a[i] := -100 + random(201); write(a[i] : 6) end;
writeln;
for i := n downto 1 do
begin a[2 * i]:= k; a[2 * i - 1]:= a[i] end;
writeln('ответ:');
for i:= 1 to 2 * n do write(a[i]:6);
writeln
end.
221
329
Ответы на вопрос:
1)
var
a: integer;
even,odd: byte;
begin
readln(a);
even := 0;
odd := 0;
while a > 0 do begin
if (a mod 2) = 0 then
even := even + 1
else
odd := odd + 1;
a := a div 10;
end;
writeln('even: ', even);
writeln('odd: ', odd);
end.
2)
var
n, m: longint;
a: byte;
begin
readln(n);
m := 0;
while n>0 do begin
a := n mod 10;
n := n div 10;
m := m*10 + a;
end;
writeln(m);
readln;
end.
3)
var
a,b,c,i,n: integer;
begin
write('n = ');
readln(n);
a := 0;
write(a,' ');
b := 1;
write(b,' ');
for i:=3 to n do begin
write(a+b,' ');
c := b;
b := a + b;
a := c
end;
readln
end.
Объяснение:
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Kocoeva30.08.2021 08:19
-
malika040801.03.2023 01:09
-
GreenExtreme599521.09.2022 13:07
-
MarinaRaim2611.11.2020 12:33
-
Мини19630.04.2022 18:28
-
em130STM16.08.2020 05:04
-
Deniza2305.01.2020 21:55
-
ivankasranka209.03.2023 21:18
-
Ариэль11111131.05.2022 13:19
-
kasimova2000118.07.2020 01:16
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.