Вопрос по информатике:
1). реализуйте решение задачи, программируя на Паскале. Единицы массы пронумерованы следующим образом : 1 - килограмм, 2 - миллиграмм, 3 - грамм, 4 - тонна. Дан номер елиницы массы и масса тела М в жтих единицах (М-вещественное число). Вывести массу данного тела в киллограммах.
ПОМОГИТЕ ПОДАВАВЛУЙСТА !!!!!!
- 08.10.2017 02:58
- Информатика
- remove_red_eye 12076
- thumb_up 7
Ответы и объяснения 1
Var n,x:integer;
m:real;
begin
writeln('Введите единицу массы');
read (n);
writeln('Введите массу');
read (m);
if (n4) then
writeln('ОШИБКА');
if n = 1 then
write (m,' кг');
if n = 2 then
begin
m:=m/1000/1000;
write (m,' кг');
end;
if n = 3 then
begin
m:=m/1000;
write (m,' кг');
end;
if n = 4 then
begin
m:=m*1000;
write (m,' кг');
end;
end.
- 09.10.2017 17:04
- thumb_up 7
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.