Irina Svetlana
?>

1)дано предложение. вывести "столбиком" все его буквы н, стоящие на нечетных местах. 2)из слова вертикаль путем "вырезок" и "склеек" его букв получить слова тир и ветка 3)дано предложение. напечатать все его слова, предварительно преобразовав каждое из них по следующему правилу: а) заменить первую встреченную букву a на о; б) удалить из слова все вхождения последней буквы (кроме нее самой pascal abc, написать программу

Информатика

Ответы

Михеев557
1)
var s:string; i:integer;
begin
readln(s);
for i:=1 to length(s) do
 if (i mod 2=1)and(s[i]='н') then writeln(i,' - н');
end.

Пример:
Дано предложение. Вывести "столбиком" все его буквы н, стоящие на нечетных местах
3 - н
53 - н
67 - н

2)
var s,s1,s2:string;
begin
s:='вертикаль';
s1:=s[4]+s[5]+s[3];
s2:=s[1]+s[2]+s[4]+s[6]+s[7];
writeln(s1,' ',s2);
end.

Результат:
тир ветка

3. Замечание. Предполагается, что слова в предложениях отделяются друг от друга одним пробелом.
3 а)
var s:string; i,k:integer;
begin
readln(s);
k:=0;
for i:=1 to length(s) do
 begin
 if (s[i]='а')and(k=0) then
  begin s[i]:='о'; k:=1; end;
 if s[i]=' ' then k:=0;
 end;
writeln(s);
end.

Пример:
Напечатать все его слова, предварительно преобразовав каждое из них по правилу
Нопечатать все его слово, предворительно преоброзовав кождое из них по провилу

3 б)
var s,sl,s_new:string; i:integer;
begin
readln(s);
s:=s+' ';
s_new:=''; sl:='';
for i:=1 to length(s) do
 if s[i]<>' ' then sl:=sl+s[i]
 else begin
  while pos(s[i-1],sl)>0 do delete(sl,pos(s[i-1],sl),1);
  s_new:=s_new+sl+s[i-1]+' ';
  sl:='';
 end;
writeln(s_new);
end.

Пример:
нечетное предложение больше четного
нчтное прдложние больше четнго 
Suralevartem

1 - True/False

2 - логическая операция, которая объединяет два высказывания в одно новое, которое будет являться истинным тогда и только тогда, когда оба исходных высказывания ложны.

3 - Конъюнкция

4 - X И Y И Z

5 - OR

6 - 1. Инверсия;

2. Конъюнкция;

3. Дизъюнкция;

4. Импликация;

5. Эквивалентность.

7 - логическая операция, которая преобразует исходное высказывание в новое, значение которого противоположно исходному.

8 - Импликация

9 - логическая операция, которая объединяет два высказывания в одно новое, которое будет являться истинным тогда и только тогда, когда оба исходных высказывания истинны

10 -  Конъюнкция

11 - ?

12 - ?

Объяснение:

mzia-mzia-60682

1. Что такое носитель? (Б) Материальная среда, используемая для записи и хранения информации

2. Носитель, имеющий наиболее массовый употребление – это (Г) Бумага

3. В каком году Александр Белл изобрел телефон? (В) 1876 г.

4. Кто создал теорию информации? (Б) К. Шеннон

5. Что такое избыточность кода? (В) Многократное повторение передаваемых данных -- неудачный ответ. Скорее многократное повторение - это один из добавить избыточность кода, есть и другие

6. Какие средства связи используются в компьютерных сетях? (Б) Радиосвязь -- есть и другие, конечно

7. Вместимость – это (А) Плотность хранения данных -- самый удачный вариант из предложенных, но всё же это не плотность хранения, а количество хранимой информации

8. Где появилась бумага? (А) В Китае

9. В каком году возникла теория связи? - нет верного ответа. Обычно упоминают 1948 год, когда была опубликована работа Шеннона "Математическая теория связи"

10. Винчестер компьютера – это (А) Пакет магнитных дисков, надетых на общую ось

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

1)дано предложение. вывести "столбиком" все его буквы н, стоящие на нечетных местах. 2)из слова вертикаль путем "вырезок" и "склеек" его букв получить слова тир и ветка 3)дано предложение. напечатать все его слова, предварительно преобразовав каждое из них по следующему правилу: а) заменить первую встреченную букву a на о; б) удалить из слова все вхождения последней буквы (кроме нее самой pascal abc, написать программу
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

retropluse832
pokrov777krest
Mashkov-Daniil1764
elozinskaya
leonid-adv70
aleksey7800
vak1984
ivanovmk1977
m-illarionov
arinaunknown6867
kate1610
bellaalya13862
Galliardt Sergeevna1284
Burov1446
annabanova9