Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 29.03.2010
Сообщений: 35

коментарии

20.05.2010, 23:18. Показов 771. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Напишите коментарии к каждой строке что делаеться в каждой строке


Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
program zv;
var
A:array [1..5,1..5] of integer;
i,j,max,m5,p5,p6:integer;
s:real;
Begin
 
 for i:=1 to 5 do
 begin
 For j:=1 to 5 do
 begin
 writeln ('введите элемент массива № ',i,',',j);
 readln (A[i,j]);
 end;
 end;
 
 
j:=1;
for i:=1 to 5 do
begin
 if a[i,j]<0 then
 p5:=p5+a[i,j]
 else
 p6:=p6+a[i,j];
j:=j+1;
end;
 
max:=a[1,1];
m5:=1;
for i:=1 to 5 do
 begin
 For j:=1 to 5 do
 begin
 if a[i,j]>max then begin
 max:=a[i,j];
 m5:=j;
 end;
 end;
 end;
 
 
s:=0;
if abs(p5)>=p6 then
begin
for i:=1 to 5 do
s:=s+a[i,i]*power(i,3);
end
else
begin
for i:=1 to 5 do
s:=s+a[i,m5]/p6;
end;
 
writeln ('ответ: ',s);
 
end.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
20.05.2010, 23:18
Ответы с готовыми решениями:

Коментарии к программе
uses crt; var fil:text; txt:array of string; s,st:string; i,k,j,n,maxlen:integer; begin clrscr; ...

Коментарии к программе
Здравствуйте, можете объяснить, что делает каждый элемент этой программы? uses crt; var i,n,k :byte; f: real; a : array of...

Коментарии к программе
Помогите написать программу перевода с 2 й системы счисления в 16 ричную систему счисления сделать текст программы с коментариями. Заранее...

1
 Аватар для Mиxaил
542 / 447 / 162
Регистрация: 10.12.2009
Сообщений: 1,857
21.05.2010, 01:41
повтор темы:
КОментариии
не надоело ли???
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
21.05.2010, 01:41
Помогаю со студенческими работами здесь

Написать описание, и коментарии к программе
var i,count:integer; x:array of integer; a,b:integer; begin write('введите A = ');readln(a); write('введите B = ');readln(b); ...

Коментарии к коду
Форумчане, добрый день, прошу помощи! Суть дела заключается в том, нужно пояснение к каждой строчке программы. (Ну или хотя бы ту часть,...

коментарии к программе
Program trinadcat; uses crt; Type car = (BMW,Audi,Oka,Reno,Mersedes); cars = Set Of car; stran=(Russia,...

написать коментарии
Program XXX; uses crt; var a,b,c,d,e,f:real; begin clrscr; write('a='); readln(a); b:=a*a; writeln('b=',b:0:5); c:=b*b;

написать коментарии
program XXX; var x,y:real; begin write('Vvedite x = '); read(x); write('Vvedite y = '); read(y); if (x&lt;=0) and (y&lt;=(x+2)/2)...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru