Студентам с лабораторными сюда (архивная - 2015)

Idainet, но тогда все таки придется проверять через isAlpha, а то пунктуацию и другие символы будешь пропускать.......

 

Народ помогите у меня ошибка только в третьем задании
Определить наименьший по модулю элемент среди нечетных по номеру элементов трпетьей четверти массива
Программа:

Program LR5V23;
Const n=37;a=-9;b=6;
Var
min ,Buf,i,k:integer;
F:array[1..N] of integer;
c,p:real;
begin Randomize;
Writeln ('Vector f=');
For i:=1 to n do begin
F:=a+Random(b-a);
Write (F:4);
end;
Writeln;
P:=0;k:=0;
i:=round (n/2);
While i<=n do Begin
If F <>0 Then Begin
k:=k+1;P:=p+1/F;
end;
i:=i+1;
end;
Writeln ('p=',p:8:4);
min:=9;
For i:=Round (n/2) to round(3*n/4) do
If I mod 2=0 then
If abs (f)<min Then min:=abs(f);

Writeln ('min=',min:4);
For i:=N div 3 to N-1 Doтут препод докапался
For k:=i+1 to N -1 do
If(F<0) AND (F[k]<0) Thenи вот тут непойму в чем ошибка
if 1/F<1/F[k] then begin
Buf:=F;
F[k]:=F[k];
F[k]:=buf;
end;
For i:=(n div 4 ) to (2*N div 4) Do
IF F<0 Then Write (F:4);
Writeln;
end.


помогите пожалуйста мне просто завтра зачет сдавать(

 

Idainet, если ты учитываешь, что с 91 по 96 идут знаки......то с тобой полностью согласен)

 

просто на самом деле проблема с этим заданием!

 

уже как-то стыдно тут просить о помощи, но если поможете мне написать эту лабораторку то я(надеюсь) уже не буду тревожить. А даже сам буду помагать.

Написать функцию которая выводит на экран количество вхождений подстроки в строку используя стандартные функции и указатели.

 

Можно так......

Code:

void main()
{
	char str[] = "haha";
	char sl[] = "ha";

	char *p = str;
	int k = strlen(sl);

	int count = 0;
	while(p)
	{
		if(p = strstr(p,sl))
		{
			count++; p += k;
		}  
	}

	cout << count << endl;
}

 

мне ни кто не поможет?(

 

Только хотел выложить код почти 1в1 с твоим , только вместо haha , пользовал hoho

 

Idainet, пробовал запускать такой проект?

Code:

void main()
{
	for(char i = 0; i < 255; i++)
		cout << i;
}

 

SnooPy паскаль не проходил....( не могу помочь......

 

не эт то что маленькими and писать как то преподу пофиг мне она во че подчеркнула
трпетьей четверти массива[/I]
Writeln ('min=',min:4);
For i:=N div 3 to N-1 Doтут препод докапался
For k:=i+1 to N -1 do
If(F<0) AND (F[k]<0) Thenи вот тут непойму в чем ошибка
if 1/F<1/F[k] then begin
Buf:=F;
F[k]:=F[k];
F[k]:=buf;

 

мне ни кто не поможет?(

 

Доброго времени суток.

Помогите решить пожалуйста 6 лаб по с++.

на upload.com.ua

С меня качественный рерайт)

 

очень нужна программа провести подсчет согласных букв во введенной стоке, на си


вот пример проверки гласных
void main()
{
char buf[] = "eyuioa"; ///нужный нам алфавит

char str[] = "forum.antichat.ru";
int count = 0;
for(int i = 0; str != '\0'; i++)
{
for(int j = 0; buf[j] != '\0'; j++)
{
if(str == buf[j]) { count++; break; }
}
}

cout << count << endl;
}

только она вопще не работает
и неммогу понять зачем здесь 2 масива

 

эту задачу мы с Idainet обсуждали....решили не проверять по массиву.....а придерживаться кодировки

 

Ребята помогите, срочно нужна помощь ! [Delphi]

Delphi
Программа должна разбивать число на множители !!
Например при вводе 16, чтобы разбивало на 2*2*2*2;
14 на 7*2 и подобное !
А то я в недоумении... Или если есть какие-то мысли, а я потом реализую сам...
Должна состоять из функций и процедур.
А и еще должна останавливать вывод ответов через каждые 20 строк. ...
На завтра надо

 

Натолкните на мыссль как реализовать!
1. Дан текстовый файл. Считая, что количество букв в одном слове не превосходит 20, определить, сколько в файле имеется слов, состоящих из одного, двух, трех и т.д. символов. Результат вывести в другой текстовый файл.

 

на потоках надо написать или какие функции тебе можно использовать? НА С или С++? или .....

 

pascal

 

Написать программу, которая заменяет все буквы «о» в строке на буквы «а»
(си)
кто может напешыте мне на завтра очень нужно