Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.76/37: Рейтинг темы: голосов - 37, средняя оценка - 4.76
0 / 0 / 0
Регистрация: 30.04.2010
Сообщений: 19

Заменить каждую точку многоточием

30.04.2010, 18:20. Показов 7119. Ответов 30
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
помогите пожалуйста, нифига не шарю в паскале
1. Дана действительная квадратная матрица порядка n. Преобразовать матрицу по правилу: строку с номером n сделать столбцом с номером n, а столбец с номер n сделать строкой с номером n.

2. Дан двумерный массив содержащий 14 строк и 15 столбцов. Элементами массива являются целые числа. Упорядочить массив по невозрастанию элементов пятого столбца

3. Заменить каждую точку многоточием(т.е. тремя точками).

4. Напечатать все слова, отличны от последнего предварительно перенеся последнюю букву слова в начало.

5. Дан текст из заглавных русских букв. Определить упорядочены ли буквы в алфавитном порядке.

6. Ввести и обработать три массива, содержащие соответственно 3,6 и 8 целых компонентов.

7. Дан двумерный массив размером 11х11. Найти количество всех положительных элементов этого массива.

8. Дана действительная квадратная матрица порядка n. Найти наибольшее из них значений элементов расположенных в заштрихованной области матрицы
9. а) В массиве из 10 элементов найти наименьший элемент и поменять его местами с последним элементом массива
б) Дан массив из 15 элементов. Записать сначала все отрицательные элементы, затем все положительные элементы во второй массив. Нули не записывать.
в) Дан одномерный ряд на 15 элементов. Возвести в квадрат все компоненты, следующие за первой отрицательной компонентной.

Надеюсь на вас! заранее Спасибо!!!
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
30.04.2010, 18:20
Ответы с готовыми решениями:

Преобразовать строку, заменив каждую точку многоточием
- Дана строка символов. Преобразовать ее, заменив каждую точку многоточием (т.е. тремя точками). - Дана строка символов. Группы...

Написать подпрограмму которая в строке символов заменяет каждую из групп стоящих рядом точек многоточием
Написать подпрограмму которая в строке символов заменяет каждую из групп стоящих рядом точек многоточием. Очень нужна помощь!

Дана строка символов. Преобразуйте строку, заменив в ней каждую из групп стоящих рядом точек многоточием
Дана строка символов. Преобразуйте строку, заменив в ней каждую точку многоточием (т.е. тремя точками)

30
0 / 0 / 0
Регистрация: 30.04.2010
Сообщений: 19
30.04.2010, 19:08  [ТС]
Студворк — интернет-сервис помощи студентам
Wolf, ты думаешь я что то шарю в этом?)) гыы) я безнадежен х(
0
3318 / 1380 / 110
Регистрация: 28.04.2009
Сообщений: 4,822
30.04.2010, 19:09
Оранжик, я тож в этом не шарю,но примеры тебе написали.
0
0 / 0 / 0
Регистрация: 30.04.2010
Сообщений: 19
30.04.2010, 19:10  [ТС]
ыы, тогда придется на тетрадке сдавать преподу
0
 Аватар для yanyk1n
4342 / 1474 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
30.04.2010, 19:13
1)
Pascal
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
32
33
34
35
uses crt;
const n=4;
var a:array[1..n,1..n]of integer;
i,j,b:integer;
 
begin
    clrscr;
    randomize;
    writeln('Исходная матрица');
    for i:=1 to n do
    begin 
        for j:=1 to n do
        begin
            a[i,j]:=random(100);
            write(a[i,j]:3);
        end;
        writeln;
    end;
 
    for i:=1 to N do
    for j:=1 to i-1 do
    begin
       b:=a[i,j];
       a[i,j]:=a[j,i];
       a[j,i]:=b;
    end;
  
    writeln('Преобразованная матрица');
    for i:=1 to n do
    begin 
        for j:=1 to n do write(a[i,j]:3);
        writeln;
    end;
    readln;
end.
0
0 / 0 / 0
Регистрация: 30.04.2010
Сообщений: 19
30.04.2010, 19:23  [ТС]
k1ry4, хмм, эт какая задача?)))

Добавлено через 2 минуты
k1ry4, Спасибо!)

Добавлено через 37 секунд
теперь 4 и 6 задача, и всЕеее)))))))

Добавлено через 2 минуты
Спасибо ребята!))
0
3318 / 1380 / 110
Регистрация: 28.04.2009
Сообщений: 4,822
30.04.2010, 19:31
про алфавитный порядок точно было.
0
0 / 0 / 0
Регистрация: 30.04.2010
Сообщений: 19
30.04.2010, 20:14  [ТС]
Wolf, да было

Добавлено через 32 минуты
Народ!!! пожалуйста! 2-е задачи и всЕ!!
0
3318 / 1380 / 110
Регистрация: 28.04.2009
Сообщений: 4,822
30.04.2010, 20:21
Оранжик, не наглей, тебе и так достаточно решили.
либо не забывай правила форума, новый вопрос-новая тема.
0
0 / 0 / 0
Регистрация: 30.04.2010
Сообщений: 19
30.04.2010, 21:21  [ТС]
Wolf, окей босс)) новый вопрос новая тема)
0
0 / 0 / 0
Регистрация: 14.01.2021
Сообщений: 1
14.01.2021, 15:49
Python
1
2
3
x = input('Введите предложение: ')
y = x.replace ('.','...')
print (y)
0
Модератор
10434 / 5722 / 3405
Регистрация: 17.08.2012
Сообщений: 17,411
14.01.2021, 22:09
lsagal, специально для таких, как Вы, наверху этой страницы написано: Pascal ABC. Вы что, всерьёз полагаете, что кто-то полезет на паскалевскую ветку за Вашим питоном? У Вас как с логикой?

И, если уж поднимаете тему десятилетней давности, некропостер Вы наш ненаглядный, то Ваше гениальное решение должно оправдывать поднятие темы из небытия. А то, что Вы написали, может написать любой троечник.

Будьте внимательнее.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
14.01.2021, 22:09
Помогаю со студенческими работами здесь

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

Каждую чётную цифру числа заменить на 0, а каждую нечётную на 1
с клавиатуры вводится длинное целое число не менее 50 цифр. Каждую чётную цифру числа заменить на 0, а каждую нечётную на 1.

Процедура: заменить в текстовом файле каждую цифру на следующую по величине ('9' заменить на '0')
Используя подпрограмму-процедуру, заменить в текстовом файле каждую цифру на следующую по величине('9' заменить на '0').

Заменить каждую 3 букву на знак %
Нужно заменить каждую 3 букву в тексте на знак %. Помогите пожалуйста

Заменить каждую точку многоточием
1)Заменить каждую точку многоточием 2)Подсчитать кол-во вхождений заданной буквы в заданном тексте 3)Определить какая из двух фамилий...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
31
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru