Построить циклические алгоритмы: 1. Вывести на экран значения линейной функции f=10x-5 для целого х, изменяющегося
на интервале [min; 50] 2.Перевести караты в граммы, если 1 карат = 0,2 грамма. Интервал каратов: от 1 до 10 с шагом 0,5
Знаешь ответ?
Чтобы оставить ответ, войдите или зарегистрируйтесь.
Ответ или решение 1
Афак
1. var x: integer;
min: byte;
f: array[1..50] of integer;
begin
writeln('Введите начальное значение min');
readln(min);
for x := min to 50 do f[i] := (10 * x) - 5;
for x := 1 to (50 - min) do write('f', x, ' = ', f[i]);
end
2.
var x: byte;
begin
x := x + 0.5;
while x <= 10 do begin
x := x + 0.5;
writeln(x, ' карат = ', x * 0.2, ' грамма');
end;
end.
Новые вопросы в разделе Информатика
s3129502@gmail.com
16.02.2024, 13:53
Информатика
7-9 класс
Адинела
05.10.2022, 08:15
Гаязутдин
05.10.2022, 01:10
Алайбек
05.10.2022, 01:05
Акияма
05.10.2022, 01:00
