Решить задачи в Pascal 1.Скорость первого автомобиля V1 км/час, второго – V2 км/час. Расстояние между ними S км. Какое расстояние между ними будет через t часов, если автомобили двигаются в разные стороны. 2.Дана цена одного килограмма конфет – А рублей. Определить сколько будут стоить пакеты конфет в 200 грамм и 1,2 кг.
169
ОТВЕТЫ
//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.
//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.
21
Отв. дан
Keswyn
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Mnedor
Деление 216 на семиричную систему счисления с решением! ...
2019-01-22 12:48:53
Валерий
2019-01-22 12:48:45
Magosesch
Сколько БИТ состовляет сообщение,содержащее0,5Кбайт ...
2019-01-22 12:47:30
Феликс
Подскажите сделать информатику?? ...
2019-01-22 12:47:15