ANTICHAT Forum
HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
НОВЫЕ ТОРГОВАЯ НОВОСТИ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
Перезагрузить страницу Студентам с лабораторными сюда
   
 
 
Опции темы Поиск в этой теме Опции просмотра
Предыдущая Предыдущее сообщение   Следующее сообщение Следующая

  #11  
Старый 13.05.2010, 23:51
EndLeSSDre@M
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
С нами: 8850305

Репутация: 259
По умолчанию
Цитата:
Сообщение от idm_hello  
Delphi
Задача: Написать процедуру, заполняющую квадратную целочисленную матрицу A NxN по следующему правилу: A[i, j] = |_ sin (exp(i) + j^10 _| , где |_ _| операция округления до ближайшего целого, i - строки матрицы, j - столбцы матрицы.
PHP код:
var
i,j,n:integer;
a:array[1..100,1..100] of integer;
begin
write('vvedite N: ');
readln(n);
 for i:=1 to n do begin
   for j:=1 to n do begin
      a[i,j]:=round(sin(exp(i) + exp(ln(j)*10)));
      write(a[i,j],' ');
   end;
 writeln;
 end;
readln;
end. 
Последний раз редактировалось EndLeSSDre@M; 13.05.2010 в 23:55..
 
Ответить с цитированием
 



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Американским студентам запретили пользоваться Skype KPOT_f!nd Мировые новости. Обсуждения. 1 28.09.2006 03:47
Любителям квестов сюда!! FoX's Болталка 10 25.01.2005 20:42



Здесь присутствуют: 2 (пользователей: 0 , гостей: 2)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.