СРОЧНО. 9 класс. Составить программу перевода количества сантиметров в метры и километры. (паскаль) Чтобы, например, если ввести 100 см, то выдавалось бы 1 метр и 0,001 километр.
До скольки знаков округлять?
Var a:real; begin write('Write amount in cm: '); readln(a); writeln('In meters: ',a/100:0:4); writeln('In kilometers: ',a/10000:0:4); readln end.
А я уверен учитель хочет компаткности
Или секунду
Короче, смотри могу написать программу побольше, но она будет нормально выводить, но тогда вопросов от учителя будет больше
Или немного пойти обманом
Как этот код
var a:integer; begin write('Write amount in cm: '); readln(a); writeln('In meters: ',a div 100,',',a mod 100); writeln('In kilometers: ',a/10000:0:3); // от этого никак не избавится readln end.
Просто обьяснишь учителю и все
Я думаю вопросов не возникнет
Да и у меня вопрос к учителю твоему, 9 клас и не знать елементарного елемента при выводе
класс*