Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal Вывести на экран последние N слов из файла (слова вывести в строчку) В задании просят вывести определённое количество слов с конца текстового файла. Решил пойти простым путём - переписал в буферный текстовый массив каждую строку, попутно считая количество этих строк, и, теперь, зная количество этих строк, несложно отсчитать от последней нужное и вывести требуемые слова. Код работает для текстов небольшого объёма. Но проблема возникает, когда тестируешь текст с... https://www.cyberforum.ru/ pascal/ thread2432752.html Алго: Нарисовать хоккейную площадку Pascal
Нарисовать хоккейную площадку (можно прямоугольную, без скругления углов) и запрограммировать движение шайбы (нельзя выходить за границу площадки, движение программируется клавишами на цифровой клавиатуре) {colsp=2}Коды клавиш на правой клавиатурепри выключенной клавише NumLock 0|96 1|97 2|98 3|99 4|100 5|101 6|102
Pascal Подсчет значения переменной https://www.cyberforum.ru/ pascal/ thread2432565.html
Подсчитать значение переменной Z после выполнения фрагмента программы Z:=(x-y)/2; If z>x*y then z:=-(x-y) else z:= sqrt(5*x+y); X =2; Y=6 (тип данных не в счет). Z:=x-0.5*y; If abs(z)>x then z:=-(y+x) else z:=sqrt(x); X =4; Y=2 (тип данных не в счет). Z:=x-0.5*y; If abs(z)>x then z:=(y+x) else z:=sqrt(x); X =(-2); Y=4 (тип данных не в счет). Добавлено через 3 минуты Листинг программы не...
Pascal Составить программу, выводящую на экран сведения о периодических изданиях https://www.cyberforum.ru/ pascal/ thread2432519.html
Составить программу, выводящую на экран сведения о периодических изданиях (наименование издания, тираж, годовая стоимость). Распечатать наименования изданий, тираж которых превышает заданное значение.
Переписать строки в файле в обратном порядке Pascal
Такая проблема, нужно в Паскале переписать строки в обратном порядке. Допустим исходник на вводе => файл: Ночь. Курю на скамье под окошком. И такая вокруг тишина. Над деревней по звездной дорожке Молодая гуляет луна. Легкий шорох слетит из-под крыши, Промелькнет черной молнией тень - Ловят мошек летучие мыши.
Pascal Отсортировать массив по убыванию https://www.cyberforum.ru/ pascal/ thread2432423.html
Прошу помощи,сортировка некорректно работает program lab10; Uses CRT; const m=30; Var i,n,j:integer; k:real; x,p,a,b,c,d,z:arrayof real;err,f:array of integer; oshib:arrayof string;
Pascal Перевести код с С++ на паскаль Перевести код с С++ на паскаль, плюсы знаю, а паскаль нет, но обстоятельства вынуждают писать код на паскале #include "pch.h"//подключение заголовочного файла #include <iostream>//библиотека ввода ввывода #include <conio.h>//заголовочный файл для создания текстового интерфейса пользователя using namespace std; // строка, позволяющая использовать cout без std перед ним //... https://www.cyberforum.ru/ pascal/ thread2431566.html Pascal Exitcode = 200 . Иногда появляется эта ошибка, в чем проблема?
program lb3; uses wincrt,crt,graph; var x,y,mx,N,k:integer; vikhod,check:boolean; a,b,n1,pol,m1,ee,m2,S,t1,t2,pg,ll,error:double; procedure Menu(); var key:char; begin clrscr;
Pascal С использованием дерева поиска удалить из заданного текста дубликаты слов С использованием дерева поиска удалить из заданного текста дубликаты слов. Дерево создано, но не знаю, как брать сравнивать элементы друг с другом в дереве и удалять (при наличии) дубликаты. Помогите, пожалуйста. Заранее спасибо) https://www.cyberforum.ru/ pascal/ thread2431464.html Pascal Сформировать квадратную матрицу порядка n по заданному образцу Сформировать квадратную матрицу порядка n по заданному образцу: https://www.cyberforum.ru/ pascal/ thread2431142.html
Создать динамический массив А целых чисел размерностью M на N. Заполнить массив случайными числами в диапазоне [-50;50] Pascal
Создать динамический массив А целых чисел размерностью M на N. За-полнить массив случайными числами в диапазоне Элементы массива, находящиеся в столбцах на нечетных местах.
Pascal Вова купил билет в трамвае 13-го маршрута и сразу посчитал суммы первых трёх цифр и последних трёх цифр номера билета https://www.cyberforum.ru/ pascal/ thread2431047.html
3. Вова купил билет в трамвае 13-го маршрута и сразу посчитал суммы первых трёх цифр и последних трёх цифр номера билета (номер у билета шестизначный). Оказалось, что суммы отличаются ровно на единицу. «Я в одном шаге от счастья», — подумал Вова. Прав ли он? Составьте программу, и в качестве ответа выведите «Да» или «Нет».
2373 / 775 / 561
Регистрация: 15.01.2019
Сообщений: 2,394
09.04.2019, 00:48 0

Перевести сантиметры в километры метры и сантиметры - Pascal - Ответ 13476372

09.04.2019, 00:48. Показов 2360. Ответов 1
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
program SmInKm;
var
  a : real;
  b1,b2,b3: integer;
begin
  Writeln('Введите длину в сантиметрах:');
  Readln(a);
  b1:= trunc(a / 100000);
  b2:= trunc((a - b1*100000)/100);
  b3:= trunc(a - b1*100000 - b2*100);
  writeln('Длина равна: ',b1,' км. ',b2,' м. ',b3,' см.');
Readln;
end.


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

Напишите программу, которая сможет переводить километры в метры, сантиметры, миллиметры, и наоборот
Напишите программу, которая сможет переводить километры в метры, сантиметры, миллиметры, и наоборот.

Перевести миллиметры в сантиметры, дециметры и метры
9. Черепаха проползла t мм. Сколько это м, дм и см

Перевести километры в метры
Ребят помогите с этой задачей ну очень нужно. определить по введённому номеру еденицк измерения(...

Перевести миллиметры в (метры, сантиметры, миллиметры)
Вводится значение в миллиметрах. Вывести его в метрах, сантиметрах, миллиметрах (до 999м 99см 9мм)...

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

Создать программу перевода миллиметров в сантиметры, метры и километры
помогите составить прогу в Visiual basic,очень нужно : программу перевода миллиметров в...

Напишите программу, которая сможет переводить километры в метры, сантиметры, миллиметры, и наоборот
Напишите программу, которая сможет переводить километры в метры, сантиметры, миллиметры, и наоборот.

Перевести метры в сантиметры
помогите мне сделать просто метры в сантиметры Добавлено через 10 минут желательно...

Перевести дюймы в метры, сантиметры и миллиметры
Здравствуйте, помогите разобраться. Длина отрезка задана в дюймах (1 дюйм = 2,54 см). Перевести...

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