1словарный запас некоторого языка составляет 256слов каждое из которых состоит точно из 4 букв.сколько букв в алфавите? ?
259
333
Ответы на вопрос:
pascal:
program strings;
uses crt;
var i,open,close: integer;
a: string;
begin
open: =0;
end: =0;
clrscr;
write('введите строку: '); readln(a);
for i: =1 to length(a) do
begin
if a[i]='(' then open: =open+1;
if a[i]=')' then close: =close+1;
end;
writeln('открывающихся скобок: ', open, ' штук');
writeln('закрывающихся скобок: ', close, ' штук');
readln;
end.
Популярно: Информатика
-
buraya198907.07.2022 02:34
-
annatiko198431.01.2021 16:26
-
kimttaehyung13.05.2023 16:59
-
DathVayolet07.06.2022 12:53
-
tanea20111118.01.2022 18:38
-
murzyeva197022.09.2021 04:57
-
Pro100870005.06.2021 22:29
-
маша500217.10.2020 02:48
-
Мадинакадырова0628.03.2022 08:56
-
сергоо1620.06.2022 04:32