tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Написать программу перевода
Написать программу перевода килограмм в тонны. в программе pascalabc.
Kiosshi
2 25.07.2019 03:30
0
Ответы
сас001
15.09.2020 23:27
Var kg,tn:real;
begin
write('введите вес в килограммах ');
readln(kg);
writeln(kg,' кг. = ',kg/1000,' т.');
end.
ПОКАЗАТЬ ОТВЕТЫ
Дарья22012007
15.09.2020 23:27
Uses crt;
var k,t:real;
begin
clrscr;
write('Введите килограммы: ');
Readln(k);
t:=k/1000;
Writeln('Это составляет ',t,' тонн');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
доминион11
15.09.2019 04:50
Даны действительные числа x1,y1,x2,y2,x3,y3. выясните является треугольник с такими вершинами равносторонний. pascal...
abbasbayaliev
18.09.2019 11:10
Моделью какого процесса можно назвать дневник школьника?...
birdibir
18.09.2019 11:10
Вчём отличая языков программирования разных видов...
shahanovaoksan
18.09.2019 11:10
Количество цифр для записи чисел в позиционной системе счисления … . а) выбирается произвольно б) задается условно в каждом отдельном случае в) соответствует основанию системы...
вошл
17.04.2020 10:24
Из приведённых ниже утверждений выберите истинные для одного объекта можно создать только одну модель модель отображает часть признаков оригиналамодель в точности повторяет оригиналмодель...
подругаКатя
21.01.2022 08:08
плез З комп’ютерного диска (діаметр 120 мм) восьмикласники вигото-вили квадратну заготовку для сувеніру. Складіть програму, яка ви-значатиме сторону подарункової коробки для цього...
fill1337
21.01.2022 08:14
Введение в облачные базы данных. Понятие NoSQL....
superpuperkrosh
21.01.2022 08:24
Автоматизация усовершенствования процессов разработки ПО....
aitdariya
01.06.2019 23:10
Решить ! данычисла ,необходимо возвести во 2ую степень sin 1 числа и cos 2 числа.вот так как то 1 2 3 4 5 6 7 8 9 10 var i, n: integer; p : real; begin write( введите n: ); readln(n);...
vNeronRazerv
09.10.2021 03:23
5 предложений на тему Что я вижу со своего окна и 4 вопроса...
Популярные вопросы
Найти слово,а котором все согласные звуки звонкие.выписать это слово по скатам...
2
Проверочные слова к словам молоток,лягушка,вернулся...
3
Откуда в воздухе берётся пыль? заранее : 3...
2
Таня на 3 года младше своей сестры, а вместе им 27 лет.сколько лет каждой из...
1
100г so3 растворили в 100г . найдите массовую долю серной кислоты в полученном...
1
Укажите тип связи в словосочетаниях. а)летнее утро. б)работал в поле. в поднимается...
1
Вкаком из этих слов предпоследнююбукву нельзя проверять однокоренными словами?...
1
Какие из перечисленных ниже веществ являются простыми и какие сложными: соль,...
2
Придумать предложение распространенное со словами - завхоз универмаг газпром...
1
Серебристо-белый металл сroрает на воздухе с образованием белоrо порошка, нерастворимого...
2
begin
write('введите вес в килограммах ');
readln(kg);
writeln(kg,' кг. = ',kg/1000,' т.');
end.
var k,t:real;
begin
clrscr;
write('Введите килограммы: ');
Readln(k);
t:=k/1000;
Writeln('Это составляет ',t,' тонн');
end.