Цитата:
Сообщение от SvarovskI
Решите пожалуйста 2 задачки,если не трудно!!!
!)Даны две последовательности целых чисел а1,а2,..,а8 и b1.b2,..,b8.
Найти кол-во целых чисел в первойиз них и кол-во нечетных во второй.
|
В первой количество целых чисел - 8 (по определению).
n:=0;
FOR i:=1 TO 8 DO
IF (b[i] mod 2) = 1 THEN INC(n);
Writeln(n);
Readln;
Раздел описания переменных и присвоения значений элементам массивов делайте сами.
Цитата:
Напишите программу вычисления выраждения y=(tg(x)+sin(x))*e^cos(x) при х=3,7.
РезультатВывести в формате 5:2.
ЗАранее огромнейшее спасибо!!!
|
y:=(Sin(x)/Cos(x)+Sin(x))*Exp(Cos(x));
И что?