ОБЬЯСНИТЕ ЧТО ЗА ЧТО ОТВЕЧАЕТ, ОЧЕНЬ Ганс, неси пулемёт') ;
e:=(' Ля-ля-ля тополя' );
r:=( ' Рельсы-рельсы, шпалы-шпалы');
t:=(' Тра-та-та-та-та' );

writeln('Дарова, водила, зсеся тута ты можешь заменять строчки в стихе, всеми какие пожилаешь!');
writeln('Стих тут 4х строчный, поэтому выбирая больше 4, будет веселуха, поробуй!');
writeln('Сначала напиши любой текст, а после строчку, где ты хочешь заменить');
writeln('Попробуй, напиша текст, а в следующей строчке номер строки (1;2;3;4)');
readln(q);
writeln('Текст: ',q);
readln(a);
if a = 1 then
writeln('Меняю 1ю строку')
else if a = 2 then
writeln('Меняю 2ю строку')
else if a = 3 then
writeln('Меняю 3ю строку')
else if a = 4 then
writeln('Меняю 4ю строку')
else
begin
writeln('Ошибка');
writeln('Строчки ',a,' не существует');
exit
end;
writeln(' ');
if a = 1 then
begin
writeln(' ',q);
writeln( e);
writeln( r);
writeln( t);
writeln();
writeln('Конец фильма')
end
else if a = 2 then
begin
writeln( w);
writeln(' ',q);
writeln( r);
writeln( t);
writeln();
writeln('Конец фильма')
end
else if a = 3 then
begin
writeln( w);
writeln( e);
writeln(' ',q);
writeln( t);
writeln();
writeln('Конец фильма')
end
else if a = 4 then
begin
writeln( w);
writeln( e);
writeln( r);
writeln(' ',q);
writeln();
writeln('Конец фильма')
end
else

writeln(' Ты schwul');

end.

272

343

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

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

andreyvlasov22

Информатика

4,4(63 оценок)

Определите значение переменной а после исполнения алгоритма: a := 4 b := 24+9*a a := b/5*a В ответе укажите одно число – значение переменной а.

112

Объяснение:

Panda2004s

Информатика

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

var a: array[1..10] of integer;

i,s,n,k: integer;

begin

read(n);

for i : = 1 to n do begin

read(a[i]);

if a[i]> 0 then begin

s: =s+a[i];

k: =k+1;

end;

writeln(s, s/k);

end.

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

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

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

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

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

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