Kasyusba
4 год назад
Домашняя работа №8по теме "Линейные алгоритмы. Решение задач"Пожалуйста посчитайте пожалуйста с информатикой! Нужно написать программу в Паскаль ABC 1.Мальчик может бегать в 3 раза быстрее, чем ходить. Скорость его ходьбы составляет А км/час. Мальчик принял участие в марафонском забеге, но сошел с дистанции, пробежав Х км. Как узнать сколько времени он затратил?2.Цех по ремонту бытовой техники имеет ежедневно прибыль Р, с которой платит налог 70%. Из оставшейся доли прибыли 30% идет на развитие производства, а остальное - на заработную плату 8 работникам. Какова заработная плата работника за месяц?
ОТВЕТЫ
Nedka
Oct 24, 2020
1) program znanija2;
var speed, A, X:integer;
time:real;
begin
readln(A);
readln(X);
speed:= A * 3;
time:= X / speed;
writeln(time);
end.
2)
program znanija3;
var P:integer;
tax, rest, wages, answer:real;
begin
read(P);
tax:=(P*70)/100;
rest:= P - tax;
wages:= (rest*70)/100;
answer:= wages / 8;
writeln(answer);
end.
var speed, A, X:integer;
time:real;
begin
readln(A);
readln(X);
speed:= A * 3;
time:= X / speed;
writeln(time);
end.
2)
program znanija3;
var P:integer;
tax, rest, wages, answer:real;
begin
read(P);
tax:=(P*70)/100;
rest:= P - tax;
wages:= (rest*70)/100;
answer:= wages / 8;
writeln(answer);
end.
263
Смежные вопросы:
