Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
16 декабря 2022 06:49
1085
напечатать таблицу перевода расстояний в дюймах в сантиметры (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
Остались вопросы?
Еще вопросы по категории Информатика
Что будет выведено на экран после выполнения фрагмента программы? s := 'фоксфорд'; s1 := 'крокодил'; s := copy(s,1,4) + 'т' + copy(s1,2,2) +...
укажите максимальную по номиналу цифру шестиричной системы счисления...
3. Маша хотела поделиться впечатлениями об Олимпийских играх с подругами, но забыла, где именно она сохрани- ла фотографию Сочи.jpeg. Ниже представле...
Укажите величины, которые целесообразно представлять с помощью таблиц: рост учеников класса список учеников класса оценка ученика по физике имя...
Отличие установки от загрузки...
Все предметы 
