Вопрос по информатике:
Умничка помоги пожалуйста
Задача. Дано расстояние в сантиметрах. Найти число полных метров в нем.
Код программы.
Program prim_4;
Var a,b:integer;
Begin
Write(‘введите расстояние в сантиметрах’);
Readln(a);
b:=a div 100;
Writeln(b,' метров ');
Readln
End.
Задания для самостоятельного выполнения .
1. Дана масса в килограммах. Найти число полных центнеров в ней.
2. Дана масса в килограммах. Найти число полных тонн в ней.
3. Дано расстояние в метрах. Найти число полных километров в нем.
- 26.01.2015 00:05
- Информатика
- remove_red_eye 14048
- thumb_up 18
Ответы и объяснения 1
program _1;
var a,b:integer;
begin
write ('введите количество килограмм ' );
readln (a);
b:=a div 100;
writeln (b, ' полных центнеров ' );
end.
program _2;
var a,b:integer;
begin
write (' введите массу в килограммах ');
readln (a);
b:= a div 1000;
writeln (b, ' полных тонн ');
end.
program _3;
var a,b : integer;
begin
write (' введите расстояние в метрах ');
readln (a);
b: a div 1000;
writeln (b, ' полных километров: ' );
end.
- 26.01.2015 20:43
- thumb_up 32
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.