Напишите программу которая находит полное число метров

от admin

Умничка помоги пожалуйста
Задача. Дано расстояние в сантиметрах. Найти число полных метров в нем.
Код программы.
Program prim_4;
Var a,b:integer;
Begin
Write(‘введите расстояние в сантиметрах’);
Readln(a);
b:=a div 100;
Writeln(b,’ метров ‘);
Readln
End.
Задания для самостоятельного выполнения .
1. Дана масса в килограммах. Найти число полных центнеров в ней.
2. Дана масса в килограммах. Найти число полных тонн в ней.
3. Дано расстояние в метрах. Найти число полных километров в нем.

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.

Домашняя работа спишите слова орфограммы орфограммы жи ши вершина душистый дружить кому мышей испечный

Нужна помощь с решением этой задачи, не могу понять, причём тут масса и что с ней делать

Len-sovet

Входные данные:
На вход программе подаётся три целых числа: b_1 b 1 ​ , q q и n n , каждое на отдельной строке.

Задача: Расстояние в метрах

Напишите программу, которая находит полное число метров по заданному числу сантиметров.

Формат входных данных:
На вход программе подаётся натуральное число – количество сантиметров.

Формат выходных данных:
Программа должна вывести одно число – полное число метров.

Задача: Мандарины

Формат входных данных:
На вход программе подаётся два целых числа: количество школьников и количество мандаринов, каждое на отдельной строке.

Формат выходных данных:
Программа должна вывести два числа: количество мандаринов, которое достанется каждому школьнику, и количество мандаринов, которое останется в корзине, каждое на отдельной строке.

Формат входных данных:
На вход дается число целое n n – население Вселенной.

Формат выходных данных:
Программа должна вывести одно число – количество выживших.

Формат входных данных:
На вход программе подаётся целое число – место с заданным номером в вагоне.

Формат выходных данных:
Программа должна вывести одно число – номер купе, в котором находится указаное место.

Напишите программу для пересчёта величины временного интервала, заданного в минутах, в величину, выраженную в часах и минутах .

Формат входных данных:
На вход программе подаётся целое число – количество минут.

Формат выходных данных:
Программа должна вывести текст в соответствии с условием задачи.

Напишите программу, в которой рассчитывается сумма и произведение цифр положительного трёхзначного числа.

Формат входных данных:
На вход программе подаётся положительное трёхзначное число.

Формат выходных данных:
Программа должна вывести два числа с поясняющим текстом: сумма цифр и произведение цифр.

Формат входных данных:
На вход программе подаётся положительное трёхзначное целое число, все цифры которого различны.

Читать:
Как в ут 11 посмотреть движение товара

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

Задача: Четырёхзначное число

Напишите программу для нахождения цифр четырёхзначного числа.

Формат входных данных:
На вход программе подаётся положительное четырёхзначное целое число.

Формат выходных данных:
Программа должна вывести текст в соответствии с условием задачи.

Даю 50 баллов! Задача по информатике: С клавиатуры вводится расстояние в метрах. Напишите программу, которая находит число полн

С клавиатуры вводится расстояние в метрах. Напишите программу, которая находит число полных километров и метров (пример: вы ввели число 4501, в результпте которого вы получите: 4501м=4км 501м)
ПОМОГИИИИТЕ!

<em>PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018</em>
<em>Внимание! Если программа не работает, обновите версию!</em>

<u>1. Современное решение</u>

begin
var m:=ReadInteger(‘Введите расстояние в метрах’);
var (km,mm):=(m div 1000,m mod 1000);
Write(m,’км = ‘,km,’км’);
if mm>0 then Writeln(‘ ‘,mm,’м’) else Writeln
end.

<u>Пример</u>
Введите расстояние в метрах 4501
4501км = 4км 501м

<u>2. Так часто учат писать в школе</u>

begin
Write(‘Введите расстояние в метрах’);
Readln(m);
km:=m div 1000;
mm:=m mod 1000;
Write(m,’км = ‘,km,’км’);
if mm>0 then Writeln(‘ ‘,mm,’м’)
else Writeln;
end.

HTML (от англ. HyperText Markup Language — «язык гипертекстовой разметки») — стандартизированный язык разметки документов во Всемирной паутине. Большинство веб-страниц содержат описание разметки на языке HTML (или XHTML). Язык HTML интерпретируется браузерами; полученный в результате интерпретации форматированный текст отображается на экране монитора компьютера или мобильного устройства.

Язык HTML является приложением SGML (стандартного обобщённого языка разметки) и соответствует международному стандарту ISO 8879.

Язык XHTML является более строгим вариантом HTML, он следует всем ограничениям XML и, фактически, XHTML можно воспринимать как приложение языка XML к области разметки гипертекста.

Во всемирной паутине HTML-страницы, как правило, передаются браузерам от сервера по протоколам HTTP или HTTPS, в виде простого текста или с использованием шифрования.

Напишите программу которая находит полное число метров

triolana

PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!

1. Современное решение

begin
var m:=ReadInteger(‘Введите расстояние в метрах’);
var (km,mm):=(m div 1000,m mod 1000);
Write(m,’км = ‘,km,’км’);
if mm>0 then Writeln(‘ ‘,mm,’м’) else Writeln
end.

Пример
Введите расстояние в метрах 4501
4501км = 4км 501м

2. Так часто учат писать в школе

begin
Write(‘Введите расстояние в метрах’);
Readln(m);
km:=m div 1000;
mm:=m mod 1000;
Write(m,’км = ‘,km,’км’);
if mm>0 then Writeln(‘ ‘,mm,’м’)
else Writeln;
end.

Похожие статьи