Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
program xxx;
var a,b,c : string;
begin
write('введите название 1 фигуры-');
readln (a);
write('введите название 2 фигуры-');
readln (b);
write('введите название 3 фигуры-');
readln (c);
writeln (' фигуры: ',a,b,c);
readln
end.
сначала найдем производную первого порядка
производная из этой функции равна произведению самой функции и производной степени
y'==
теперь второго порядка
тот же принцип из той же функции только домножаем еще на 7/5
y''=
рrogram summa;
var s, a, b, c : word;
write('введите a - > '); readln(a);
write('введите b - > '); readln(b);
write('введите с - > '); readln(c);
s=а+в+с
write(' сумма равна ',s);
в принципе все, должно быть правильно
вроде бы 100*100=10000 бит=1250 байта
Популярные вопросы