Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
15 декабря 2022 16:19
1402
напечатать таблицу перевода расстояний в дюймах в сантиметры (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
·
Хороший ответ
17 декабря 2022 16:19
Остались вопросы?
Еще вопросы по категории Информатика
Как при помощи смещения на вектор в кумире, исполнитель чертежник, нарисовать квадрат 4х4?...
Построить логическую схему, соответствующую логическому выражению. Определить значение логического выражения F, построив таблицу истинности для заданн...
Составьте программу, которая распечатывает полученное число справа налево. Например, если введено число 12345, программа должна напечатать 54321. В от...
16. Презентация – это… 1) - Графический документ, имеющий расширение .txt или .pcx 2) - Набор картинок-слайдов на определенную тему, имеющий расширен...
Здравствуйте, вот задания: 1) Аналитические возможности табличного процессора MS Excel. Технология работы в табличном процессоре MS Excel. Аналитиче...
Все предметы 
