powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Помогите!
25 сообщений из 41, страница 1 из 2
Помогите!
    #35723262
Oscor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Народ помогите пожалуйста написать прогу!!! А то я вообще не шарю!!!! Плиз!!!!!!!!! Задание такое Из данного списка имен напечатать те которые начинаются на "В"!!!!!!!!!!
...
Рейтинг: 0 / 0
Помогите!
    #35723264
Фотография Василий Викторович
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oscor, на каком хоть языке то писать?:)
...
Рейтинг: 0 / 0
Помогите!
    #35723431
Фотография MasterZiv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oscor пишет:
> Плиз!!!!!!!!! Задание такое Из данного списка имен напечатать те которые
> начинаются на "В"!!!!!!!!!!

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
CL-USER> (defvar *in* '(asd bas sdf lqjw ands ndas
                         basd qldk boo foo baaam berg))
*IN*
CL-USER> (remove #\B *in* :test-not #'eql
                  :key (lambda (s) (elt (symbol-name s)  0 )))

(BAS BASD BOO BAAAM BERG)
CL-USER>

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Помогите!
    #35723455
Алексей Морозов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
слова_на_б([A]|X, [A]|Z) = A='Б'._, слова_на_б(X, Z);
слова_на_б([A]|X, Z) = ! A='Б'._, слова_на_б(X, Z);
слова_на_б([], []);



Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Помогите!
    #35723459
Алексей Морозов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SELECT text FROM words WHERE text LIKE 'Б%'
...
Рейтинг: 0 / 0
Помогите!
    #35723473
Фотография MasterZiv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей Морозов пишет:

> слова_на_б([A]|X, [A]|Z) = A='Б'._, слова_на_б(X, Z);
> слова_на_б([A]|X, Z) = ! A='Б'._, слова_на_б(X, Z);
> слова_на_б([], []);
Какой йазыг ?
Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Помогите!
    #35723495
Алексей Морозов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Одна из разновидностей пролога. Переводя на русский язык программу:

[/src]Отношение "слова_на_б" между двумя обьектами T1, T2
Если T1 это пустой список, то и T2 пустой список.

Отношение "слова_на_б" между двумя обьектами T1, T2
T1 - это список из первого элемента A и конца списка X.
A это обьединение строк "_" и любой.
Рекурсивно вычислить "слова_на_б" для остатка списока X и Z.
T2 - это список из первого элемента A и конца списка Z.

Отношение "слова_на_б" между двумя обьектами T1, Z
T1 - это список из первого элемента A и конца списка X.
A это НЕ обьединение строк "_" и любой.
Рекурсивно вычислить "слова_на_б" для остатка списка X и Z.
[/src]
...
Рейтинг: 0 / 0
Помогите!
    #35723496
Алексей Морозов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Отношение "слова_на_б" между двумя обьектами T1, T2
  Если T1 это пустой список, то и T2 пустой список.

Отношение "слова_на_б" между двумя обьектами T1, T2 
  T1 - это список из первого элемента A и конца списка X. 
  A это обьединение строк "_" и любой. 
  Рекурсивно вычислить "слова_на_б" для остатка списока X и Z.
  T2 - это список из первого элемента A и конца списка Z. 

Отношение "слова_на_б" между двумя обьектами T1, Z
  T1 - это список из первого элемента A и конца списка X. 
  A это НЕ обьединение строк "_" и любой. 
  Рекурсивно вычислить "слова_на_б" для остатка списка X и Z.
...
Рейтинг: 0 / 0
Помогите!
    #35724392
Maykie
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
OscorНарод помогите пожалуйста написать прогу!!! А то я вообще не шарю!!!! Плиз!!!!!!!!! Задание такое Из данного списка имен напечатать те которые начинаются на "В"!!!!!!!!!!
Код: plaintext
1.
2.
3.
4.
5.
starts_with_b [] = False
starts_with_b ys = (head ys) == 'B'

main = do
	print $ filter starts_with_b ["Boo", "Bar","Foo", "Bee", " B"]
...
Рейтинг: 0 / 0
Помогите!
    #35724416
Maykie
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Василий ВикторовичOscor, на каком хоть языке то писать?:)
Самое практичное - на каком нибудь у которого есть онлайн компилятор(типа codepad'а ), чтобы можно было а) проверить б) развлечься с незнакомым языком, но это моё имхо а не топикстартера
...
Рейтинг: 0 / 0
Помогите!
    #35724556
Гы
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
words = %w{asd bas sdf lqjw ands ndas basd qldk boo foo baaam berg}
words.select {|word| word.match /^[B,b].*/}
...
Рейтинг: 0 / 0
Помогите!
    #35724665
Алексей Морозов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
MaykieВасилий ВикторовичOscor, на каком хоть языке то писать?:)
Самое практичное - на каком нибудь у которого есть онлайн компилятор(типа codepad'а ), чтобы можно было а) проверить б) развлечься с незнакомым языком, но это моё имхо а не топикстартера


Плохой online-компилятор, он сокеты недает:
Disallowed system call: SYS_socketcall

:(
...
Рейтинг: 0 / 0
Помогите!
    #35725198
Фотография Ёш
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Гы
Код: plaintext
1.
2.
words = %w{asd bas sdf lqjw ands ndas basd qldk boo foo baaam berg}
words.select {|word| word.match /^[B,b].*/}

Код: plaintext
1.
@x = qw(asd bas sdf lqjw ands ndas basd qldk boo foo baaam berg);
map { print "$_\n" if /^b/i; } @x;
а в руби разве нет i флага у регэкспов ?
...
Рейтинг: 0 / 0
Помогите!
    #35725224
Гы
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ЁшГы
Код: plaintext
1.
2.
words = %w{asd bas sdf lqjw ands ndas basd qldk boo foo baaam berg}
words.select {|word| word.match /^[B,b].*/}

Код: plaintext
1.
@x = qw(asd bas sdf lqjw ands ndas basd qldk boo foo baaam berg);
map { print "$_\n" if /^b/i; } @x;
а в руби разве нет i флага у регэкспов ?

Есть, конечно. Забыл :)
...
Рейтинг: 0 / 0
Помогите!
    #35725235
Гы
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ГыЁшГы
Код: plaintext
1.
2.
words = %w{asd bas sdf lqjw ands ndas basd qldk boo foo baaam berg}
words.select {|word| word.match /^[B,b].*/}

Код: plaintext
1.
@x = qw(asd bas sdf lqjw ands ndas basd qldk boo foo baaam berg);
map { print "$_\n" if /^b/i; } @x;
а в руби разве нет i флага у регэкспов ?

Есть, конечно. Забыл :)
Код: plaintext
words.select {|word| word.match /^b/i}
...
Рейтинг: 0 / 0
Помогите!
    #35725437
manni
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Велик С++ лямбда!
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
#include <algorithm>
#include <string>
#include <iostream>
#include <vector>
#include <functional>
#include <boost/lambda/lambda.hpp>
#include <boost/lambda/loops.hpp>

using namespace boost::lambda;
using namespace std;
int _tmain(int argc, TCHAR *argv[]) 
{ 


	vector<string> strArr;
	strArr.push_back("lol");
	strArr.push_back("Bulk");
	strArr.push_back("bbb");
	strArr.push_back("BigAAFFF");
	strArr.push_back("Bigot");

	remove_copy_if(strArr.begin(),
		strArr.end(),
		ostream_iterator<string>(cout, "\n"),
		_1[ 0 ] != 'B');
						 
	int i;
	std::cin >> i;


	return  0 ; 
}
...
Рейтинг: 0 / 0
Помогите!
    #35725466
Гы
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
manniВелик С++ лямбда!
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
#include <algorithm>
#include <string>
#include <iostream>
#include <vector>
#include <functional>
#include <boost/lambda/lambda.hpp>
#include <boost/lambda/loops.hpp>

using namespace boost::lambda;
using namespace std;
int _tmain(int argc, TCHAR *argv[]) 
{ 
поскипано
}


Зело многословен ваш цэпэпэ, однако :)
...
Рейтинг: 0 / 0
Помогите!
    #35725698
belugin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
#light
let words = ["asd"; "bas"; "sdf"; "lqjw"; "ands"; "ndas"; "basd"; "qldk"; "boo"; "foo"; "baaam"; "berg"]
words |> List.filter (fun x -> x.ToLower().StartsWith("b") ) |> print_any

Код: plaintext
1.
2.
3.
words = ["asd", "bas", "sdf", "lqjw", "ands", "ndas", "basd", "qldk", "boo", "foo", "baaam", "berg"]
print [x for x in words if x.lower().startswith('b')]
print filter(lambda x:x.lower().startswith('b'), words)
...
Рейтинг: 0 / 0
Помогите!
    #35725720
Фотография mayton
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Злыдни. Афтор наверное, уже пошёл искать пистолет и один патрон.
...
Рейтинг: 0 / 0
Помогите!
    #35725725
belugin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Maykie, haskell1
...
Рейтинг: 0 / 0
Помогите!
    #35725755
Гы
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
belugin,

А что за языки? Первое что-то ML-подобное, может F#? Второе не узнаю, Nemerle или что?
...
Рейтинг: 0 / 0
Помогите!
    #35725759
Гы
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не, больше на питон похоже...
...
Рейтинг: 0 / 0
Помогите!
    #35725825
Фотография mayton
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Этож Хаскель. Иххх деревня...
...
Рейтинг: 0 / 0
Помогите!
    #35725830
Гы
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
maytonЭтож Хаскель. Иххх деревня...

Языками не владею, Ваше Блогородие. Паки, паки, иже херувимы... :)

Стоп. Хаскель вроде у Maykie был...
...
Рейтинг: 0 / 0
Помогите!
    #35725833
belugin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Гы,

F# и Питон
...
Рейтинг: 0 / 0
25 сообщений из 41, страница 1 из 2
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Помогите!
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]