Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
16 декабря 2022 06:49
1008
напечатать таблицу перевода расстояний в дюймах в сантиметры (1 дюйм = 2,54 см) для значений от 1 до 10 дюймов с шагом 1
1
ответ
Const D = 2.54;
var i: integer;
rez: real;
begin
for i := 1 to 10 do begin
rez := i * D;
writeln( i, ' см = ', rez, ' дюйм' );
end;
end.
var i: integer;
rez: real;
begin
for i := 1 to 10 do begin
rez := i * D;
writeln( i, ' см = ', rez, ' дюйм' );
end;
end.
0
·
Хороший ответ
18 декабря 2022 06:49
Остались вопросы?
Еще вопросы по категории Информатика
Помогите срочно..!! Какие из предложений являются высказываниями?...
Если фрагмент поместить в буфер обмена, то сколько раз его можно вставить в текст ? А)один Б)это зависит от количества строк в данном фрагменте В)стол...
Иногда выводит ошибку: Ошибка времени выполнения, индекс находится вне границ массива. PascalABC.NET вот само задание: Дан массив А(n). Поменять места...
Помогите пожалуйста!!!!! Нужно написать программу в Паскаль, чтобы на экран выводился квадрат из звездочек....
Задача 2: Потерявшееся число Тимофей выбрал натуральное число n, делящееся на 6, и записал на трёх разных карточках само число n, его половину и его т...