Кнаписать программу на паскаль авс. вычислить значение функции z=cos (x) + y, где x и y изменяется от 1 до n.
2003veronika07
1
05.01.2020 20:48
1
Другие вопросы по теме Информатика
megaosiyo
26.08.2019 08:00
grishchenkoale
26.08.2019 08:00
coffeepro80
26.08.2019 08:00
ДимаМасленников
26.08.2019 08:00
katasinicina39
26.08.2019 08:00
davidkhatkin
26.08.2019 08:00
sumochkaaaaa
26.08.2019 07:50
asel07071
26.08.2019 07:50
Популярные вопросы
- 3. периметр прямоугольнналь - 17 см. насамоугольника равен 46 см, а его диаго-17...
2 - Хотя бы что нибудь одно . сессия...
1 - Укажите предложения с прямой речью. семь дочек было у матери семь дочек. однажды...
3 - 214. запишите краткие формы имён прилагательных. поставьте ударебеглые гласные...
1 - Глава детство сочинение на тему: 5 добрых советов самому себе в текстовой форме,...
2 - Какие общие романтические черты в текстах лермонтова ангел и мцыри ?...
3 - Найдите корни уравнений (823-829): 1) 1,2(х - 5) = 0,2х + 6; 2)1,3(t – 0,6)...
2 - 2- 7 y шестых плюс 4 игрек плюс 7 третьих равно минус игрек вторых ...
2 - 1read text a and circle the correct answer.this text was written for1 scientists...
1 - Улар, тынара и сайкал могут собрать коробку абрикосов за 18 минут. работая отдельно,...
1
var
z: real;
x,y,N: integer;
begin
Write('N= ');
Readln(N);
for x := 1 to N do
for y := 1 to N do
begin
z := cos(x)+y;
Println('x=', x, '; y=', y, '; z=', z);
end;
end.