Напишите программу печати таблицы перевода расстояний из дюймов в сантиметры (1 дюйм = 2,5 см) для значений длин от 1 до 20 дюймов.
5-9 класс
|
{Pascal ABC.NET}
var i:integer;
b:array[1..20] of real;
begin
for i:=1 to 20 do
begin
b[i]:=i*2.5;
writeln(b[i]);
end;
end.
думаю так
var inch:integer;
begin
writeln('* alphaues is thinking... *');
writeln;
writeln('*******************************');
for inch:=1 to 20 do
writeln('* ',inch,' inches = ',inch*2.54,' *');
writeln('*******************************');
end.
Другие вопросы из категории
Путешественник идёт из одного города в другой 10 дней, а другой путешественник тот же путь проходит за 15 дней. Через сколько дней встретятся путешественники, если выйдут одновременно навстречу друг другу из этих городов?
Читайте также
Пример вывода ответа: 5*2 = 10
6*2 = 12 и т.д.
2) Напишите программу перевода расстояния из метром в сантиметры для значений длин от 1 до 15 метров.
(Информатика. 8 класс. Паскаль)
б)Напишите программу, которая массив из 20 элементов заполнит неповторяющимися целыми числами и выведет на экран элементы с нечетными индексами.
результат
2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат
Имеются данные о количестве полных лет трех призеров спартакиады. Напишите программу, выбирающую и выводящую возраст самого младшего призера.