Как сделать противоположное число в паскале
Добавил пользователь Cypher Обновлено: 05.10.2024
Помогите составить программу решения следующих задач!
1. Дано два числа а и в. Выведите гипотенузу по заданным катетам.
2. Напиши программу, которая считывает целое число ивыводит текст аналогичный примеру. Пробелы, знаки препинания, строчные буквы важны. Пример:
ввод вывод
179 The next number for the numder 179 is 180
The previaus number for the numder 179 is 178
3. N школьников делят K яблок поровну, неделящийся остаток остается в корзине. Сколько яблок достанется каждому школьнику? Программа получает на входе числа N и K и должна вывести искомое количество яблок.
4. N школьников делят K яблок поровну, неделящийся остаток остается в корзине. Сколько яблок останется в корзине?
5. Длина Московской кольцевой автомобильной дороги 109 км. Байкер Вася стартует с нулеого илометра МКАДа и едет со скоростью V км в час. На какой отметке он остановится через t часов?
програама получает на входе два числа v и t. если v>0, то Вася движется в положительном направлении, если v
2. Напиши программу, которая считывает целое число ивыводит текст аналогичный примеру. Пробелы, знаки препинания, строчные буквы важны. Пример:
ввод вывод
179 The next number for the numder 179 is 180
The previaus number for the numder 179 is 178
Да я их и не выбирала - просто учусь, а в программировании не в зуб ногой. Буду очень рада если вы мне поможите.
Там нам еще задач задали, но решила постепенно выкладывать.
Вторая:
var
a:integer;
begin
read(a);
writeln('The next number for the numder ',a,' is ',a+1);
write('The previaus number for the numder ',a,' is ',a-1);
end.
пусть я не знаток английского, но разве пишется numder, а не number?)
Третья:
var
n,k:integer;
begin
read(n,k);
writeln(n mod k);
end.
Четвёртая:
var
n,k:integer;
begin
read(n,k);
writeln(n div k);
end.
Люди человеки,помогите пожалуйста с задачкой нуна вот чё Составить прогу используя оператор цикла с предусловием. Вычислить количество отрицательных значений Sin(Fi) на интервале <а.в>с заданным шагом.
Сделала программы к задачам, но при добавлении в контестер начались проблемы. Задача 1 и 2 - пишет неправильный формат вывода. А у 3 и 4 в ответе получается не то что надо.
В 3 просят выводить число яблок, которое достанется каждому. Например школьников 4, яблок 12 - должно получиться 3. В 4 задаче при аналогичных числах должно получиться 2 (просят вывести сколько ябок останется в корзине).
А все эти задачи в каком паскале набираются? Мне нужно во Фри Паскаль.
Мы когда решали на учебе то в ответах задач получались целые числа, без дробной части после запятой - может поэтому в контестере пишет неправильный формат вывода?!
№10 | Автор: Berestovskiy | 2012-02-10, 08:56 | Изменено: Berestovskiy - Пт, 2012-02-10, 09:09 | Репутация: [ + 211 ]
В языке Pascal есть ряд операций для работы с логическим типом данных - boolean.
Логическая переменная может принимать только два значения - True(истина) или False(ложь).
Операции сравнения
Сравнение - это простые условные выражения, которые сравнивают два логических значения, и возвращают True или False.
Free Pascal поддерживает такие операции сравнения:
Равно = (эквивалентно)
Возвращает True, если сравниваемые объекты равны, в ином случае возвращает False.
Не равно <>
Возвращает True, если сравниваемые объекты не равны, в ином случае - False.
Больше >
Возвращает True, если значение больше второго, иначе - False.
Больше равно >=
Возвращает True, если значение первой переменной больше или равно второй.
Программирование. Числовые типы данных Pascal-Паскаль
- Скачено бесплатно: 19518
- Куплено: 414
-
->Программирование. Числовые типы данных Pascal-Паскаль
Числовые типы данных Pascal-Паскаль
Наиболее распространенные в математике числовые типы – это целые числа, которые представляют бесконечное множество дискретных значений, и действительные числа, которые представляют неограниченный континуум значений.
Описание числовых типов данных (целые) Паскаля
В пределах одного языка могут быть реализованы различные подмножества множества целых чисел. Диапазон возможных значений целых числовых типов зависит от их внутреннего представления, которое может занимать один, два или четыре байта. Так, в Паскале 7.0 используются следующие целые числовые типы данных:
| Числовые типы данных (ЦЕЛЫЕ ТИПЫ) Паскаля | ||
|---|---|---|
| Название числового типа данных | Длина, байт числового типа данных | Диапазон значений числового типа данных |
| Byte | 1 | 0..255 |
| ShortInt | 1 | -128..+127 |
| Word | 2 | 0..65535 |
| Integer | 2 | -32768..+32767 |
| LongInt | 4 | -2 147 483 648..+2 147 483 647 |
С целыми числовыми типами данных Паскаля можно выполнять следующие операции:
- Арифметические:
сложение(+);
вычитание(-);
умножение(*);
остаток от деления (mod);
возведение в степень;
унарный плюс (+);
унарный минус (-).
В Паскале используются следующие типы вещественных чисел, которые определяют произвольное число лишь с некоторой конечной точностью, зависящей от внутреннего формата вещественного числа:
| Длина числового типа данных, байт | Название числового типа данных | Количество значащих цифр числового типа данных | Диапазон десятичного порядка числового типа данных |
|---|---|---|---|
| 4 | Single | 7..8 | -45..+38 |
| 6 | Real | 11..12 | -39..+38 |
| 8 | Double | 15..16 | -324..+308 |
| 10 | Extended | 19..20 | -4951..+4932 |
| 8 | Comp | 19 . .20 | -2*10 63 +1..+2*10 63 -1 |
При описании вещественной переменной типа real в памяти компьютера будет создана переменная размерностью 4 байта. При этом 3 байта будут отданы под мантиссу, а один – под порядок.
Над действительными числовыми типами данных можно выполнять следующие операции:
- Арифметические:
сложение (+);
вычитание(-);
умножение(*);
деление(/);
возведение в степень;
унарный плюс (+);
унарный минус (-).
Исходники Pascal (127)
Справочник
Справочник по паскалю: директивы, функции, процедуры, операторы и модули по алфавиту
1. Повторение.
Строковые величины. Замена символов. Подсчет количества символов. Накопление литерных величин. Цикл While.
2. Функции преобразования строковых величин.
Многие операции с числами гораздо проще выполнять, если предварительно их перевести в строковую величину. Для этого в Паскале используют стандартные процедуры Str и Val.
ВНИМАНИЕ! До этого дня мы в программа использовали функции, которые записывались справа от знака присваивания (sqrt(x), length(x), a mod b и др.) Процедура в отличии от функции – это отдельный оператор, который не нуждается ни в знаках присваивания, ни в дополнительных конструкциях языка. После процедур ставится точка с запятой. Примеры процедур: readln(x), writeln('X=').
STR(X,S); – процедура преобразования целого числа Х в строковую величину S.
STR(X:0:2,S); – процедура преобразования действительного числа Х (Х-real) в строковую величину S.
Заметим, что при преобразовании действительных чисел необходимо использовать форматированный вид действительного числа - X:0:2, где первое число удобно всегда ставить 0, а второе - количество знаков после запятой.
VAL(S,X,K); - процедура преобразования строковой величины S в число Х. K – признак, переменная ЦЕЛОГО типа, которая остается равна 0, если преобразование удалось или, если преобразование не состоялось, ей присваивается номер первого символа, который не удалось преобразовать.
Например, после выполнения процедуры:
VAL('35',X,K); - X=35,K=0
S:='3.4'; VAL(S,X,K); - S='3.4', X=3.4, K=0
S:='3:4'; VAL(S,X,K); - S='3:4', X не определено, K=2
С числами в виде строки удобно:
- заменять цифры на указанные;
- подсчитывать количество цифр в числе;
- подсчитывать количество указанных цифр;
- находить сумму цифр;
- менять цифры местами (зная их порядковые номера);
С числами в виде строки нельзя:
- выполнять арифметические операции;
- вычислять значение математических функций.
Пример 1.
С клавиатуры вводится набор символов. Можно ли сказать, что это число? Пример 2.
Вычислить сумму цифр целого числа. Обратите внимание на то, что исходное число мы вводим как строковую величину, а затем процедурой VAL преобразуем каждый символ, то есть каждую цифру этой строковой величины в число, которое прибавляем к предыдущей сумме.
Пример 3.
С С клавиатуры вводится целое число. Возведите его в квадрат и затем замените все цифры в записи полученного числа, большие пяти, на единицы. 3. Решение задач.Pascal.
1. С клавиатуры вводятся два целых числа. Сколько раз в записи их суммы встречается цифра 1?
2. С клавиатуры вводится целое число. Запишите его наоборот (справа налево) и результат умножьте на 3.
3. С клавиатуры вводится целое число N (N>1000). Замените вторую и последнюю цифры на 3. Результат увеличьте в два раза. Сколько в полученном числе шестерок?
Читайте также: