Предмет: Информатика,
автор: Лизочка2012
1. Даны числа от 5 до 16. Необходимо вывести на экран (в столбик) удвоенное значение каждого числа.
Пример вывода ответа: 5*2 = 10
6*2 = 12 и т.д.
2) Напишите программу перевода расстояния из метром в сантиметры для значений длин от 1 до 15 метров.
(Информатика. 8 класс. Паскаль)
Ответы
Автор ответа:
0
Код:
1)
program project1;
var
i:Integer;
begin
for i:=5 to 16 do
begin
Write(i, ' * 2 = ', i*2);
Writeln;
end;
Readln;
end.
2)Выводит столбики:
program project1;
var i:integer;
begin
for i:=1 to 15 do
begin
Write(i, 'm = ', i*100, 'cm');
Writeln;
end;
Readln;
end.
Переводит значение введённого количества метров в сантиметры:
program project1;
var
i:=real;
begin
Readln(i);
Writeln(i, 'm = ', i*100, 'cm');
end.
1)
program project1;
var
i:Integer;
begin
for i:=5 to 16 do
begin
Write(i, ' * 2 = ', i*2);
Writeln;
end;
Readln;
end.
2)Выводит столбики:
program project1;
var i:integer;
begin
for i:=1 to 15 do
begin
Write(i, 'm = ', i*100, 'cm');
Writeln;
end;
Readln;
end.
Переводит значение введённого количества метров в сантиметры:
program project1;
var
i:=real;
begin
Readln(i);
Writeln(i, 'm = ', i*100, 'cm');
end.
Автор ответа:
0
да не за что)
Автор ответа:
0
а после цифры 2 две разные проги из одного задания идут? о.о
Автор ответа:
0
ну, первая формирует результат как таблицу целых чисел, а вторая - переводит введённое пользователем число в сантиметры.
Автор ответа:
0
просто вопрос задания №2 представлен в некорректной форме.
Автор ответа:
0
ммм, ясно) я списывала задание с карточки, которую нам раздали в школе
Похожие вопросы