Часовой пояс: UTC + 3 часа




Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 9 
  Пред. тема | След. тема 
В случае проблем с отображением форума, отключите блокировщик рекламы
Автор Сообщение
 

Member
Статус: Не в сети
Регистрация: 07.07.2011
Откуда: Уфа
Фото: 86
1. Дано натуральное число:
1) Найти две первые цифры числа;
2) верно ли, что первая цифра данного числа - четная?

2.Найти все трехзначные числа, которые состоят из разных цифр, а их сумма равна А (А вводится с клавиатуры).

Заранее большое спасибо. :-)

_________________
Overclockers.ru forever



Партнер
 

Moderator
Статус: Не в сети
Регистрация: 27.06.2008
Откуда: Таганрог
Если я правильно понимаю, то Pascal ABC от обычного паскаля не особо отличается, тогда используем строчный тип данных (string) и integer и команды strtoint и inttostr перевода из одного в другой, дальше написать код дело на 5-10 минут.
Т.е. ввели число, перевели в string, считали нужные символы в числе и вывели их, либо обратно посимвольно в integer и проверили на чётность (делим на 2 и смотрим остаток равен 0 или нет, если правильно помню команда выуживания остатка mod), ну или третье сравнили между собой 3 числа.


 

Member
Статус: Не в сети
Регистрация: 07.07.2011
Откуда: Уфа
Фото: 86
MaD!CaT
Спасибо уважаемый MaD!CaT :-)

_________________
Overclockers.ru forever


 

Member
Статус: Не в сети
Регистрация: 07.07.2011
Откуда: Уфа
Фото: 86
Еще задачи, помогите с решение кому не тяжело:

Найти все симетричные числа (палиндромы) из промежутка от A до B (А и B вводятся с клавы).

Дан массив целых чисел, состоящий из 20 элементов.Заполнить его с клавиатуры.Определить, есть ли 2 пары соседних элементов с одинаковыми знаками.Вывести номера всех элементов, значения которых кратны 7.

В массиве из n элементов, заполненым случайным образом, разделить все элементы с четными номерами, на среднее арифметическое первых 5 элементов массива.

В предложении S заменить все гласыне буквы на "в"

Помогите с решением кому не тяжело.Спасибо! :beer:

_________________
Overclockers.ru forever


 

Advanced member
Статус: Не в сети
Регистрация: 10.04.2003
Откуда: Москва
Найти все симметричные числа:
а. в цикле проверять все числа из данного диапозона
б. проверка:
1. преобразовать число в строку, почучить строку A
2. скопировать текст строки в другую строку (B), при копировании брать из начала_в_конец, а класть из_конца_в_начало. Т.е. переставить символы.
3. сравнить строки A и B. При равенстве '+1'

При этом можно применить 'ускорители' по старшему символу(старшим символам), но очень хлопотно.

Дан массив целых чисел, состоящий из 20 элементов.Заполнить его с клавиатуры.
Надеюсь, это трудность можно выполнить самостоятельно?

Определить, есть ли 2 пары соседних элементов с одинаковыми знаками.
Вариантов масса. От тупого логического XOR до знакового умножения и сравнения с 0.
В цикле перебирать все элементы массива и над i и i+1 выполнять проверку на знак.

Вывести номера всех элементов, значения которых кратны 7
Для этого надо выполнить "Переменная mod 7". Если 0, то кратно 7.

В массиве из n элементов, заполненым случайным образом, разделить все элементы с четными номерами, на среднее арифметическое первых 5 элементов массива.
а. вычислить среднее арифметическое первых 5 элементов массива.
б. пройтись по массиву и для всех элементов, которые "mod 2"=0 выполнить деление на среднее число, вычисленное ранее, записать назад в массив.

В предложении S заменить все гласыне буквы на "в"
а. сесть и руками составить список всех гласных букв.
б. пройтись по строке и каждый символ искать в таблице (пункт а); при совпадении заменять.


 

Member
Статус: Не в сети
Регистрация: 07.07.2011
Откуда: Уфа
Фото: 86
serj
Спасибо :-)

_________________
Overclockers.ru forever


 

помогите пожалуйста решить задачу в паскале ABC: задан текстовый файл содержащий некоторый фрагмент документа(или документ в целом),преобразовать документ к следующему виду: выровняв по ширине строки файла до заданного значения. Порядок выравнивания следующий: первое слово прижимается к началу строки,последнее слово к правому краю строки,внутри строки слова отделяются пробелами пропорционально количеству слов.


 

Member
Статус: Не в сети
Регистрация: 31.05.2014
Откуда: Россия
Фото: 63
Может кто помочь? :) Надо блок-схему нарисовать и в паскале сделать :) Вложенными циклами с предусловием, постусловием, с параметром :(
#77

_________________
Asrock G41M-S3|Intel Xeon E5440|DDR3-1333 4Gb|GeForce GT430 512Mb|Barracuda ST1000DM003 1Tb


 

Member
Статус: Не в сети
Регистрация: 31.05.2014
Откуда: Россия
Фото: 63
подсобите

_________________
Asrock G41M-S3|Intel Xeon E5440|DDR3-1333 4Gb|GeForce GT430 512Mb|Barracuda ST1000DM003 1Tb


Показать сообщения за:  Поле сортировки  
Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 9 
-

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  

Лаборатория














Новости

Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB | Kolobok smiles © Aiwan