Решить задачки в Pascal1.Скорость первого автомобиля V1 км/час,второго V2 км/час.

Решить задачки в Pascal

1.Скорость первого автомобиля V1 км/час,
второго V2 км/час. Расстояние меж
ними S км. Какое расстояние меж ними
будет через t часов, если автомобили
двигаются в разные стороны.

2.Дана стоимость 1-го килограмма конфет
А рублей. Найти сколько будут
стоить пакеты конфет в 200 гр и 1,2
кг.

Задать свой вопрос
1 ответ
//Pascal

//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.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт