60 БАЛЛОВ. 3 задания, нужны только решения - ответы уже известны: 1 - 62, 2 - 100, 3 - 10. ТОЛЬКО РЕШЕНИЯ.
241
486
Ответы на вопрос:
)напиши куда слово встовлять(вначало, вконец, ; program z2; var s,s1: string; a: integer; begin write('введите слово: '); read(s1); write('введите строку: '); read(s); s: =s+' '; a: =length(s); writeln(a); insert(s1,s,a+1); writeln('преобразованная строка: ',s); end. 2) program z1; var s: string; i,kol: integer; begin writeln('введите строку'); read(s); kol: =0; for i: =1 to length(s) do if (s< > ' ')and(s< > '1')and(s< > '2')and(s< > '3')and (s< > '4')and(s< > '5')and(s< > '6')and(s< > '7')and (s< > '8')and(s< > '9')and(s< > '0') then inc(kol); writeln(kol); end.
Популярно: Информатика
-
yuliaovcharova09.06.2020 08:06
-
notasmart14.01.2023 07:17
-
smaiershow01.02.2022 11:08
-
mrgold201105.10.2021 15:18
-
Lemnik24.11.2022 21:07
-
SalaevaDarina16.11.2020 03:18
-
linalinalogin03.12.2020 13:35
-
anavysockaa206010.01.2021 02:06
-
tolkynd1727.02.2022 05:30
-
5класс7518.07.2020 20:31