1. Информатика
  2. Написать программу, которая

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

deminav733 deminav733    1   07.10.2019 22:01    0

Ответы
cool107 cool107  10.10.2020 02:36

program meters;

 var cm:integer;

begin;

 readln(cm);

 writeln(cm div 100);

end.

ПОКАЗАТЬ ОТВЕТЫ
Ви2006ка Ви2006ка  10.10.2020 02:36

program a_2;

var i,k:integer;

l:real;

begin

write('Введите длину в см:');

read(i);

l:=i/100;

k:=int(l);

writeln('Искомая длина в метрах:',k)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
lazzat8 lazzat8  01.09.2019 00:20
На вход программе два целых числа m и n, по модулю не превосходящие 10 в 6 степени. если m делится на n или n делится на m, то требуется вывести 1, в противном случае - любое...
Daria20081 Daria20081  25.11.2021 20:18
Написати програму в Payton за задачею З клавіатури вводять будь які 2 різні числа вивести їх на екран у порядку зростання....
Тася221 Тася221  25.11.2021 20:19
С# 4.Дан массив размером nxn, элементы которого целые числа.Для хранения массив n?n использовать ступенчатый массив.Нечетные строки таблицы заменить на вектор Х ....
KittyClab KittyClab  10.03.2021 10:20
Горизонтальний переріз складського приміщення являє собою прямокутник довжиною lм шириною b м. Плоский односхилий дах приміщення нахилений до горизонту під кутом а градусів...
яяяяяя60 яяяяяя60  10.03.2021 10:18
с информатикой 8 класс. даю . ​...
BlackGolsi BlackGolsi  08.04.2020 18:15
Очень Задание: Придумайте кодирования цветов для 64-цветной палитры...
Аделя6661 Аделя6661  17.09.2019 07:00
Напишите код программы, которая будет вычислять периметр фигуры. program perimeter; var begin writeln readln end. скажите , контрольная по информатике заранее...
sa66 sa66  17.09.2019 07:00
Запишите результат выполнения арифметических операций: 15 div 7 = 12 div 4 = 12 div 5 = 20 div 7 = 15 mod 7 = 12 mod 4 = 12 mod 5 = 20 mod 7 =...
89043780617 89043780617  14.10.2019 11:15
Какие выполняются в процессе создания инфраструктуры?...
alka231282 alka231282  14.10.2019 11:15
1. то , что костя будет стартовать четвертым , передало ему 9 бит информации сколько участников примут участие в соревновании ? 2. на остановке останавливаются троллейбусы...

Популярные вопросы