Решить задачи в Pascal
1.Скорость первого автомобиля V1 км/час,
второго – V2 км/час. Расстояние между
ними S км. Какое расстояние между ними
будет через t часов, если автомобили
двигаются в разные стороны.
2.Дана цена одного килограмма конфет –
А рублей. Определить сколько будут
стоить пакеты конфет в 200 грамм и 1,2
кг.
1.Скорость первого автомобиля V1 км/час,
второго – V2 км/час. Расстояние между
ними S км. Какое расстояние между ними
будет через t часов, если автомобили
двигаются в разные стороны.
2.Дана цена одного килограмма конфет –
А рублей. Определить сколько будут
стоить пакеты конфет в 200 грамм и 1,2
кг.
More Questions From This User See All
Answers & Comments
//1)
var V1, V2, S, t: integer;
begin
write('Введите V1: '); readln(V1);
write('Введите V2: '); readln(V2);
write('Введите S: '); readln(S);
write('Введите t: '); readln(t);
writeln('Расстояние между авто через ',t,' часов = ',V1*t+s+V2*t);
end.
//2)
var A, tmp: real;
begin
write('Введите A: '); readln(A);
tmp := A / 5;
writeln('Цена за 200г = ', tmp, '. Цена за 1,2кг = ', A + tmp);
end.