irina895

18.12.2020 15:16

Информатика

Есть ответ 👍

Впредложении, состоящем из слов, разделенных одним пробелом, заменить первую букву у слов, следующих за словами die, der, das, на прописную. (c++)

167

369

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

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

estvolygina

Информатика

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

объяснение:

код к : «заменить первую букву у слов, следующих за словами die, der, das на прописную - pascal abc»

1. {

2. die, der, das

3. }

4. program words;

5. uses crt;

6. var s: string;

7. str: array[1..3] of string;

8. stemp: string;

9. i,j,k: integer;

10. flag: boolean;

11. begin

12. str[1]: ='die';

13. str[2]: ='der';

14. str[3]: ='das';

15.

16. write('enter your string: ');

17. readln(s);

18.

19. for i: =1 to length(s) do

20. begin

21.

22. flag: =true;

23. if (s[i]='d') then

24. begin

25. k: =1;

26. for j: =i to i+3 do

27. begin

28. if (s[j]=str[1][k]) or (s[j]=str[2][k]) or (s[j]=str[3][k]) then

29. begin

30. inc(k);

31. writeln(flag, ' j = ',j);

32. end

33. else

34. begin

35. flag: =false;

36. j: =i+4;

37 end;

38.

39.

40.

41. if (flag=true) then

42. begin

43. writeln('j+1=',j+1);

44. if (s[j+1]=' ') then

45. begin

46. if (s[j+2]> ='a') and (s[j+2]< ='z') then begin s[j+2]: =chr(ord(s[j+2])+32); end;

47. end;

48. i: =i+3;

49. end;

50.

51. end;

52. end;

53. end;

54.

55. writeln('new string: '+s);

56. end.

LalkaZEKA

Информатика

4,8(96 оценок)

var

A: array [1..100] of integer;

i, div2, div3, div4: integer;

begin

for i:=1 to 100 do

begin

A[i]:=i;

if A[i] mod 2=0 then

div2:=div2+1;

if A[i] mod 3=0 then

div3:=div3+1;

if A[i] mod 4=0 then

div4:=div4+1;

end;

writeln('Кол-во чисел от 1 до 100');

writeln('кратных 2: ', div2);

writeln('кратных 3: ', div3);

writeln('кратных 4: ', div4);

end.

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

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

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

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

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

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

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

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

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

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