Составить программу по информатике в pascal abc. 1. с клавиатуры одной строковой вводят имя и фамилию. составьте программу, которая: а) определяет, есть ли в определенной строке заданный символ; б) копирует в новую строку имя и
выводит его; в) выводит сначала фамилию, а затем имя. 2. составьте программу, которая в строке "касіу ясь канюшыну" заменяет имя "ясь"
Ответы на вопрос:
1
a)
program pr;
var
s: string;
c: char;
i: integer;
begin
writeln('введите имя и фамилию в одной строке');
readln (s);
writeln('введите заданный символ');
readln (c);
for i: =1 to length(s) do if s[i]=c then writeln ('в строке найден заданный символ');
readln;
end.
б)
program pr;
var
s,n: string;
c: char;
i: integer;
begin
writeln('введите имя и фамилию в одной строке');
readln (s);
i: =1;
while s[i]< > ' ' do i: =i+1;
n: =copy(s,1,i-1);
writeln(n);
readln;
end.
в)
program pr;
var
s,n,f: string;
c: char;
i: integer;
begin
writeln('введите имя и фамилию в одной строке');
readln (s);
i: =1;
while s[i]< > ' ' do i: =i+1;
n: =copy(s,1,i-1);
f: =copy(s,i+1,length(s)-i+1);
writeln(n);
writeln(f);
readln;
end.
program pr;
var s: string;
begin
s: ='касіу ясь канюшыну';
delete (s,7,3);
insert ('слово которое хотите вставить',s,7);
writeln (s);
readln;
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kateshopina070322.07.2021 10:10
-
Wertwer12328.12.2021 18:06
-
nataljalevchen12.10.2022 03:41
-
ddhfh19.06.2021 22:55
-
ikilan20111.06.2022 07:24
-
СавелийРямов19.01.2020 10:21
-
weelrockster23.02.2020 00:43
-
GoodArtur29.06.2022 01:29
-
Nikart2513.03.2023 04:55
-
savdyut28.10.2022 06:42
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.