Информатика: Можно решение на паскале

gshshagag

25.02.2020 21:20

Информатика

Есть ответ 👍

Можно решение на паскале

270

356

Посмотреть ответы 2

Ответы на вопрос:

Ajjr1

Информатика

4,6(99 оценок)

program zvonr;

uses

crt;

var

i, oc: integer;

var

s: string;

begin

writeln('Введите строку:');

readln(s);

oc := 0;

for i := 1 to length(s) do

begin

if s[i] = 'o' then

oc := oc + 1 ;

if (oc = 2) then

begin

s[i] := 'r';

oc := 3;

end ;

end;

if oc < 2 then

writeln('Слишком мало букв "o" в строке! Завершение программы...')

else

begin

writeln('Изменённая строка:');

writeln(s);

end;

readln;

end.

anyutatelichuk

Информатика

4,5(76 оценок)

// pascalabc.net 3.2, сборка 1345 от 24.11.2016 // внимание! если программа не работает, обновите её версию! begin var z: =arrrandom(readinteger('n='),1,99); writeln('массив z'); z.println; writeln('массив x'); var x: =z[1: : 2].select(p-> p/2).toarray; swap(x[0],x[x.length-1]); x.println; writeln('массив y'); var y: =z[: : 2].select(p-> p/3).toarray; swap(y[0],y[y.length-1]); y.println end. пример n= 8 массив z 74 17 35 3 33 84 48 39 массив x 19.5 1.5 42 8.5 массив y 16 11.6666666666667 11 24.6666666666667

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.