Написать программы для задач 1. Известно, что X кг шоколадных конфет стоит A рублей, а Y кг ирисок стоит B рублей. Определить, сколько стоит 1 кг шоколадных конфет, 1 кг ирисок, а также во сколько раз шоколадные конфеты дороже ирисок.2. Скорость лодки в стоячей воде V км/ч, скорость течения реки U км/ч (U < V Время движения лодки по озеру T 1 ч, а по реке (против течения) – T 2 ч. Определить путь S, пройденный лодкой (путь = время • скорость). Учесть, что при движении против течения скорость лодки уменьшается на величину скорости течения.

Информатика

Ответить

Ответы

NurlanAleksandrovich

07.10.2022

const nx = 20;
var x: array[1..nx, 1..nx] of integer;z:array[1..nx*2] of integer;
i, j, k,n,r,t: integer;
begin
Writeln('Введите размер матрицы n');Read(n);
for i := 1 to n do begin
for j := 1 to n do begin
Read(k);x[i, j] := k; end;end;
Writeln('Исходный массив');
for i := 1 to n do begin
for j := 1 to n do begin
Write(x[i, j]:4);
if x[i, j]>0 then begin t:=t+1; z[t]:=x[i, j];end;
end;
Writeln; end;
Writeln;Writeln('Одномерный массив');
for j := 1 to t do
Write(z[j]:4);
end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Написать программы для задач 1. Известно, что X кг шоколадных конфет стоит A рублей, а Y кг ирисок стоит B рублей. Определить, сколько стоит 1 кг шоколадных конфет, 1 кг ирисок, а также во сколько раз шоколадные конфеты дороже ирисок.2. Скорость лодки в стоячей воде V км/ч, скорость течения реки U км/ч (U < V Время движения лодки по озеру T 1 ч, а по реке (против течения) – T 2 ч. Определить путь S, пройденный лодкой (путь = время • скорость). Учесть, что при движении против течения скорость лодки уменьшается на величину скорости течения.