Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Я конечно извиняюсь но где варианты ответа?
var a,b,c,d: integer;
begin
writeln ('vvedite a');
read(a);
writeln ('vvedite b');
read(b);
writeln ('vvedite c');
read(c);
writeln ('vvedite d');
read(d);
if (a> b) and (a> c) and (a> d) then writeln('samoe bolshoe chislo - a')
else writeln('a ne samoe bolshoe');
end.
t1 = s1/v1
t2 = s2/v2
v(sr) = (s1+s2)/(t1+t2)
Популярные вопросы