Вниз
Скачать: CL | DM;

функции   Найти похожие ветки 

 
Terri   (2003-04-01 21:55) [0]

Как определить, каких букв в строке S больше - гласных латинских или согласных латинских


 
Palladin ©   (2003-04-01 22:13) [1]

посчитать


 
gek ©   (2003-04-01 22:15) [2]

Пробежать по строке и смотреть каждый символ
i:=length(s)
for k:=1 to i do
if s[k] in [""..""] then
else


 
DVM ©   (2003-04-01 22:22) [3]

Решение задач студентам за деньги.


 
Palladin ©   (2003-04-01 22:32) [4]


> DVM © (01.04.03 22:22)

Студентам????!!
задача 8 класса...


 
Anatoly Podgoretsky ©   (2003-04-01 23:07) [5]

По моему складывать учат в первом классе


 
Sha ©   (2003-04-01 23:13) [6]

var
s: string;
i: integer;
Count: array[0..2] of integer;
Letter: array[Char] of integer;
begin;
for i:=0 to 2 do Count[i]:=0;
Letter[]:=....; //0=ни то ни се, 1=гласная, 2=согласная
for i:=1 to Length(s) do inc(Count[Letter[s[i]]];
//Сравниваем Count;
end;



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c
14-54825
Sheng
2003-04-01 08:33
2003.04.17
sohoLib


14-54826
vanek8
2003-03-27 09:11
2003.04.17
QReport


6-54774
Zelius
2003-02-25 12:00
2003.04.17
Проблемы с TidICMPClient!


14-54843
pheonix
2003-04-01 11:12
2003.04.17
мастер delphi


1-54721
zombik666
2003-04-05 09:43
2003.04.17
sizegrip:= always_true




   Наверх