Ээээээмм
А где рисунок та??
Var s1, s2, t1, t2 :real;
begin
writeln('Введите s1, t1, t2');
readln(s1);
readln(t1);
readln(t2);
s2 := s1/t1 * t2;
writeln('s2: ',s2)
end.
Ответа не дождался. Во вложении блок-схема для пятидневной учебной недели. Для шестидневной в блоке заголовка цикла замените 5 на 6.
<span>Словосочета́ние — это соединение двух или нескольких
знаменательных слов, связанных по смыслу и грамматически, служащее для
расчленённого обозначения единого понятия (предмета, качества, действия и
др.).</span>