Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
15 декабря 2022 16:19
1318
напечатать таблицу перевода расстояний в дюймах в сантиметры (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 вопроса,помогите пожалуйста. 1)Как устроена одноранговая локальная сеть? 2)Как устроена локальная сеть с выделенным сервером? 3)Какого т...
Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить, сколько клеток будет через 3, 6, 9,..., 24 часа, если первоначально была одна амеба...
Помогите пожалуйста 1. Выберите правильные варианты вывода элементов массива на печать в строку. 1)for i:=1 to n do write (a[i], ` ` ) 2)for i:=1...
1. В графическом редакторе откройте файл Панель.bmp. 2. Подпишите инструменты графического редактора...
Все предметы 
