Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Другие темы раздела
Pascal ABC Дайте определение зарезервированного (служебного) слова языка Дайте определение зарезервированного (служебного) слова языка Зарезервированное (служебное/ключевое) слово - слово или идентификатор, имеющее конкретное значение в языке программирования.	Для введенного целого числа вычислите произведение его цифр Pascal ABC Для введенного целого числа вычислите произведение его цифр var n,m,pr:integer; begin pr:=1; readln(n); repeat m:= n mod 10; n:=n div 10; pr:=pr*m; until n=0; writeln(pr);
Pascal ABC Разность времен Здравствуйте, уважаемые программисты! помогите пожалуйста с задачкой! условие задачи - Даны значения двух моментов времени, принадлежащих одним и тем же суткам: часы, минуты и секунды для каждого из... Нужно правильно ввести и перевести в секунды, затем вычесь. Проверяйте uses crt; var h1,m1,s1,h2,m2,s2,rs:integer; begin repeat writeln('Введите первое время, часы минуты секунды:');... https://www.cyberforum.ru/ pascalabc/ thread672454.html	Pascal ABC С начала суток прошло n секунд. Выведите, что покажут часы Электронные часы показывают время в формате h:mm:ss, то есть сначала записывается количество часов, потом обязательно двузначное количество минут, затем обязательно двузначное количество секунд.... Второй код правильно показывает ответ на оба теста. Что не нравится? Приведите пример.
Pascal ABC Дан файл целых чисел. Подсчитать произведение чисел большее 5 program primer; var fx: text; s,c:integer; begin assign(fx,'F:\0001.txt'); reset (fx); S:=0; while not Eof(fx) do begin read (fx,c); program primer; var fx: file of integer; begin assign(fx,'F:\0001.txt'); reset (fx); S:=1; Типизированный же файл. И переменной S значение 1 должно быть присвоено, ибо умножение. https://www.cyberforum.ru/ pascalabc/ thread672543.html	Pascal ABC Построить квадратную матрицу порядка 2n Построить квадратную матрицу порядка 2n Паскаль изучаю только 2 месяц, прошу не сильно сложно описать программу) не совсем понятное задание. Как элементы соотносятся с n, как изменяются в промежутке, например, 33..3? Добавлено через 3 минуты хм, подумал, было, 33 (тридцать три) это меня в тупик загнало :)... https://www.cyberforum.ru/ pascalabc/ thread672549.html
Pascal ABC Работа со строками Помогите пожалуйста решить задачку. Дана непустая строка из строчных русских букв. Напечатать в алфавитном порядке все согласные буквы, не входящие в строку. https://www.cyberforum.ru/ pascalabc/ thread672449.html	Pascal ABC Графические элементы в Паскаль абс https://www.cyberforum.ru/ pascalabc/ thread672431.html Всем привет. В моем колледже мы пропускаем графическую часть Паскаля, а мне хотелось бы самостоятельно это освоить для дальнейшего написания простеньких игр. Сразу говорю, не надо мне советовать...
Pascal ABC Даны текстовые файлы f.txt и g.txt. Сравнить являются ли они равными https://www.cyberforum.ru/ pascalabc/ thread672501.html Даны текстовые файлы f.txt и g.txt. Сравнить являются ли они равными. Помогите пожалуйста. var F1, F2: text; x,y : string; Begin Assign(F1, 'D:\1.txt'); Assign(F2, 'D:\2.txt'); Reset(F1); Reset(F2); Readln(F1,x); Readln(F2,y); If x=y then writeln('Равны') else writeln('Не равны');...	Pascal ABC Найдите все ошибки в написание указанных операторов: https://www.cyberforum.ru/ pascalabc/ thread672432.html READLN(Y+1;X); WRITELN("ВВЕДИТЕ ЧИСЛО"=5); READLN(5);X:=7DIV2 ORD Y; READLN(Y+1;X); READLN(Y+1;X); ; - тож ошибка,здесь запятая должна быть.
Pascal ABC Укажите последовательность выполнения операций в произвольном выражении при отсутствии скобок Укажите последовательность выполнения операций в произвольном выражении при отсутствии скобок Согласно приоритета https://www.cyberforum.ru/ pascalabc/ thread672428.html	Какие ограничения накладывает на переменную указанных для нее тип? Pascal ABC Какие ограничения накладывает на переменную указанных для нее тип?

anlaut

0 / 0 / 0

Регистрация: 22.09.2012

Сообщений: 3

Вывести число, полученное при перестановке первой и последней цифры - Pascal ABC - Ответ 3568199

16.10.2012, 17:22. Показов 1066. Ответов 0

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

Ищу альтернативу
у меня такая проблема....задача написать так чтобы при вводе натурально числа выводило число полученное при перестановки первой и последней цифры...я написал но мне сказали что нельзя испольовать строки
вот моя

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
program second;
uses crt;
var n:Longint;
    k:integer;
    a :string;
Begin
ClrScr;
Write('Введите число-');
Read(n);
Str(n,a);
k:=length(a);
a:=a[k]+copy(a,2,k-2)+a[1];
val(a,n,k);
Writeln('n=',n);
end.

Вернуться к обсуждению:
Вывести число, полученное при перестановке первой и последней цифры Pascal ABC

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

16.10.2012, 17:22

Готовые ответы и решения:

Найти число, полученное при перестановке первой и второй цифр заданного числа
Помогите пожалуйста решить задачи: 3.Дано трехзначное число. Найти число, полученное при перестановке первой и второй цифр за-данного...

Дано трехзначное число. Вывести число, полученное при перестановке цифр сотен и десятков
Дана трех значное число.вывести число,полученное при перестановки цифр сотен и десятков исходного числа(например,123 перейти 213).

Вывести число, полученное при перестановке цифр исходного числа
2. Дано двузначное число. Вывести число, полученное при перестановке цифр исходного числа Заранее спасибо!!!

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

16.10.2012, 17:22

Помогаю со студенческими работами здесь

Вывести число, полученное при перестановке цифр исходного числа
Условие задачи: Дано двух значное число. Вывести число, полученное при перестановке цифр исходного числа. Вот что у меня получилось:var...

Получить число, полученное при перестановке первой и второй цифры заданного числа
1. Дано трёхзначное число. Получить число, полученное при перестановке первой и второй цифры заданного числа.

Составить программу, которая выводит на экран число, полученное при перестановке первой и последней и второй и третьей цифр заданного числа
Пользователь вводит четырехзначное число. Составить программу, которая выводит на экран число, полученное при перестановке первой и...

Получить число, полученное при перестановке второй и третьей цифры заданного числа
2. Дано трёхзначное число. Получить число, полученное при перестановке второй и третьей цифры заданного числа

Вывести число, полученное при перестановке цифр сотен и единиц исходного числа
Задание: Дано четырехзначное число. Вывести число, полученное при перестановке цифр сотен и единиц исходного числа (Например, 1234 перейдет...

Новые блоги и статьи Все статьи Все блоги /
Что нового в C# 14 UnmanagedCoder 10.03.2025 Предстоящая версия C# 14 обещает принести изменения, которые сделают разработку еще более приятной и эффективной. Что стоит отметить, так это влияние сообщества разработчиков на формирование новых. . .	Формулы поворота Igor3D 10.03.2025 Добрый день Тема Эти формулы приводятся во множестве тьюториалов, часто под видом "матрица вращения на плоскости". x' = x * cos(a) - y * sin(a) y' = y * cos(a) + x * sin(a) Как бы Вы их. . .	Что нового в .NET 10 UnmanagedCoder 10.03.2025 . NET 10 выходит как релиз с длительной поддержкой (LTS), включающей три года обновлений. В этом обновлении Microsoft сфокусировались на нескольких направлениях: производительность, оптимизация. . .	Отложенное высвобождение, RCU и Hazard Pointer в C++26 NullReferenced 09.03.2025 Многопоточное программирование стало важной частью современной разработки. Когда несколько потоков одновременно работают с общими данными, возникает целый ряд проблем, связанных с синхронизацией и. . .	Неблокирующийся стек на C++26 NullReferenced 09.03.2025 Традиционные способы синхронизации в многопоточном программировании — мьютексы, семафоры, условные переменные — часто превращаются в узкое место в плане производительности. При этом неблокирующиеся. . .
Обработка строк в C++26: Новые возможности string и string_view NullReferenced 09.03.2025 Новый стандарт C++26 предлагает много улучшений для работы с привычными string и относительно новыми string_view. string_view - это невладеющая ссылка на последовательность символов, появившаяся в. . .	Мой первый аддон для Blender 3D, с помощью нейронки (не зная даже азов пайтона, но это не значит что так и с остальным). Hrethgir 09.03.2025 Потратил весь день. Пол-дня мне хватило, чтобы понять что с версией с 14B мне не одолеть написание функционального кода, на языке с которым я вообще никак не знаком - пайтон. Версия 22B от другого. . .	Einstein@Home сегодня исполняется двадцать лет! Programma_Boinc 09.03.2025 Einstein@Home сегодня исполняется двадцать лет! Отправлено 19 февраля 2025 года в 17:20:21 UTC Я хочу поздравить всех наших волонтеров, разработчиков и ученых из Einstein@Home. Мы официально. . .	Заполнители и расширенный набор символов в C++26 NullReferenced 09.03.2025 C++26 представляет два важных обновления: заполнители и расширенный набор символов. Заполнители (placeholders) решают давнюю проблему лаконичности кода в шаблонных выражениях и лямбда-функциях. Они. . .	Контракты в C++26 NullReferenced 09.03.2025 Контракты – это механизм, позволяющий указывать предусловия, постусловия и инварианты для функций в коде. Эта функциональность должна была стать частью C++20, но была исключена на встрече комитета. . .

Наверх