program zadacha;
var
s,y:real;
begin
writeln('vvedite y');
readln(y);
s:=sqrt( cos(4*sqr(y)) + 7.151);
writeln('s =',s:6:2);
end.
а есть картинка этого задание или опишите его нормально
uses crt;
var
i:integer;
begin
clrscr;
for i:=1 to 25 do writeln ('информатика');
readkey;
end.
Фрезерования это правильный ответ
#include<iostream>#include<cstdlib>using namespace std;
int main(){ int a, b; cin >> a >> b; int mas[5][5]; for(int i=0; i<5; i++) for(int j=0; j<5; j++) mas[i][j]=rand()\%(b-a+1)+a;
}