Ответ:
Sub F(x)
If x > 0 Then y = Exp(x)
Else
If x < 0 Then y = Tan(x)
End If
End Sub
Объяснение:
Простейшие встроенные функции для и tg x.
Нормальный
Как минимум около 50 дотягивает
Я напишу это программу на языке С++
#include <iostream>
#include <cmath>
using namespace std;
int main() {
int n,i=1;
cin>>n;
while(pow(i,2)<=n) {
cout<<pow(i,2)<<" ";
i++; }
return 0;}
Const
n=6;
Type vector=array[1..n] of integer;
var x:vector;
i:integer;
pr:extended;
begin
<u>pr:=1;</u>
for i:=1 to n do
begin
readln(x[i]);
if x[i] mod 17=0 then
pr:=pr*x[i];
end;
writeln('proizvedenie= ',pr:4:4);
readln;
<span>end.</span>
Проверяем число Н
перебираем числа от 2 до Н, если ни одно не делится, то простое, если делится - составное