Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Учебники Какие посоветуете учебники для изучения Turbo Pascal? Или какие-нибудь сайты? https://www.cyberforum.ru/ turbo-pascal/ thread223084.html Turbo Pascal Кортеж, имеющий наименьшее количество отрицательных компонентов, домножить на значение R
Дано целое число M, вещественное число X, вещественные кортежи A,B , C кортеж, имеющий наименьшее кол-во отрицательных компонентов (такой кортеж только 1), домножить на значение R, где R = X для кортежа A,R=sqr(x) для кортежа B и R = X/10 для кортежа C. Написал вот такую прогу: program PavLab6; uses crt; const m=10; var i,s: integer; x,r,min:real; a,b:array of real; c:array of real;...
Turbo Pascal Проверить, предшествует ли время t1 времени t2 Прога вот такая: Программа вводит 2ва значения времени при помощи логической функции Ranse(t1,t2) проверяет, предшествует ли время t1 времени t2 (в пределах суток) Не догоняю как работать с процедурами и функциями.. написал вот так: Program Pavlov; uses crt; Type zapis = record hour:0..23; min,sec:0..59; end; Var t1,t2:zapis; https://www.cyberforum.ru/ turbo-pascal/ thread223054.html Turbo Pascal Массив https://www.cyberforum.ru/ turbo-pascal/ thread223053.html
Написать программу вычисления величины K, обратной произведению тех элементов массива b1,b2,…,bn, для которых выполнимо: 2^i < bi < i!. Если таких элементов нет, то ответом должно служить сообщение. ps: 2 в степени i
Игры ( через массивы) Turbo Pascal
Можно ли написать игру через массивы ? или подскажите как графически это надо написать... что там вообще надо ? просто задали написать, а кк не знаю помогите!! с Наступающем Всех!!
Turbo Pascal Шифровка. Обласная олимпиада. Подскажите! Сейчас решаю разные олимпиадные задачки, наткнулся на задачку олимпиадную обласную хмельницкую связаную с криптографией, а с криптографией я вобще не знаком. Условие: Нам дан зашифрованый текст. Ключ неизвестен. Известно что буквы в тексте теже но в другом порядке (тоесть если было слово пупкин то в шифре оно я так понял может быть например написано пнпкиу). необходимо расшифровать текст... https://www.cyberforum.ru/ turbo-pascal/ thread222942.html
Turbo Pascal Получить квадратную матрицу порядка n: Ещё одна задачечка на Паскале из рода непонятных для меня: Получить квадратную матрицу порядка n: Вот рисуночек: Помогите с исходинчком,а я как всегда премного благодарен:friends: https://www.cyberforum.ru/ turbo-pascal/ thread222874.html Turbo Pascal Даны число n, действительные числа a1,..., an. Выяснить, образуют ли возрастающую последовательность числа
Здравствуйте,добрые люди,помогите понять условие задачи на Паскале. "Даны натуральное число n, действительные числа a1,..., an. Выяснить, образуют ли возрастающую последовательность числа: a1,...,an, 2a1, 3a2,..., (n+1)an;" а1-аn - это а первое -а энное. Если можно исходничек.Всегда перемного благодарен.
Turbo Pascal треугольник в матрице =( Народ, помогите кто плс решить задачку: Выбрать из матрицы В(nxn) правый верхний треугольник и записать его в виде вектора (по строкам). Я даже условие не понял о_О, тутабрать стороны(векторы) треугольника как гланую диагональ и правую с левой стороной матрицы? Заранее спасибо. https://www.cyberforum.ru/ turbo-pascal/ thread222854.html Turbo Pascal функция в циклических процессах Вычислить величину Y для заданных с клавиатуры значений х и n: Y=sec(х^2 +0.1) + sec( sec(х^2 +0.1) +…+ sec( sec(…sec(х^2 +0.1)…)), ( n-раз ) Где sec(u)=1/cos(u). Для вычисления y использовать рекурсивную функцию вида f=f(x,n). https://www.cyberforum.ru/ turbo-pascal/ thread222842.html
Поиск минимального числа в последовательности Turbo Pascal
Пусть дана последовательность из четырёх чисел.Написать программу,осуществляющую поиск минимального и вывод порядкового номера этого числа в последовательности.(числа вводятся с клавиатуры).
Turbo Pascal В чем ошибка? Привет всем! Начал изучение паскаля и вот мое первое задание: Написать программу, которая очищает экран и выводит слов red, green, blue, yellow, каждое своим цветом в центр четвертей экрана. Я эту программу написал: http://i053.***********/1012/3d/d9c3b1a226b4.jpg (в конце после delay стоит END.) Но при компиляции выходит ошибка: http://s11.***********/i184/1012/72/800f89414e3f.jpg Что я... https://www.cyberforum.ru/ turbo-pascal/ thread222810.html
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,877
01.01.2011, 20:47 0

Разбор слова на символы и их запись в массив - Turbo Pascal - Ответ 1253516

01.01.2011, 20:47. Показов 9031. Ответов 11
Метки (Все метки)

Ответ

Так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
Uses
 CRT;
Var
 a:array[1..100] of string[20];
 s:string;
 i:integer;
begin
s:='ëþáîâü';
for i:=1 to length(s) do
a[i]:=s[i];
for i:=1 to length(s) do
write(a[i]:3);
end.
Или так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
Uses
 CRT;
Var
 a:array[1..100] of char;
 s:string;
 i:integer;
begin
s:='ëþáîâü';
for i:=1 to length(s) do
 a[i]:=s[i];
for i:=1 to length(s) do
 write(a[i]:3);
end.


Вернуться к обсуждению:
Разбор слова на символы и их запись в массив Turbo Pascal
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.01.2011, 20:47
Готовые ответы и решения:

Разбор строки на слова за 1 проход и определением самого длинного слова
Разбор строки на слова за 1 проход и определением самого длинного слова. Слова при этом не...

Преобразовать введеные символы каждого слова в массив из натуральных чисел
Решите, пожалуйста, задачу: Пользователь вводит 10 русских слов, содержащие буквы из обоих...

Дан массив символов. Удалить все слова, содержащие символы латиницы
Дан массив символов. Удалить все слова, содержащие символы латиницы. Я не понимаю как можно это...

Дан массив символов. Удалить все слова, содержащие символы латиницы
Дан массив символов. Удалить все слова, содержащие символы латиницы

11
01.01.2011, 20:47
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.01.2011, 20:47
Помогаю со студенческими работами здесь

Запись слова в динамический массив
помогите пожалуйста, пользователь вводит слово, надо записать это слово по буквам в массив (1...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru