Форум программистов, компьютерный форум, киберфорум
С++ для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 26.02.2011
Сообщений: 11

Перевод с С в Паскаль. Абрамов.388

04.04.2011, 10:00. Показов 636. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
#include<stdio.h>
#include<time.h>
#include<stdlib.h>

void main()
{
const n = 17;
srand(time(0));

int i,j,max, a[n][n];

for(i = 0; i < n; i++)
for(j = 0; j < n; j++)
a[i][j] = rand()%100;

for(i = 0; i < n; i++)
{
for(j = 0; j < n; j++)
printf("%4d",a[i][j]);
printf("\n");

}

max = a[0][0];
for(i = 0; i < n; i++)
for(j = 0; j < n; j++)
if(a[i][j] > max)
max = a[i][j];

printf("\n\nmax =%4d\n",max);

for(i = 0; i < n; i++)
for(j = 0; j < n; j++)
if(a[i][j] == max)
printf("i= %3d, j= %3d\n",i+1,j+1);
}

спс)
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
04.04.2011, 10:00
Ответы с готовыми решениями:

перевод из си++ в паскаль
for (int j = max(0, i - (n - m)); j &lt;= i &amp;&amp; j &lt;= m; ++j) Как перевести эту строчку, а именно &quot;j &lt;= i &amp;&amp; j &lt;=...

Перевод из паскаль в С++
Ребята, очень срочно, кто сможет выручайте, нужно перевести данную программу на с++! Данная задача нужна для зачета завтра! Если кто сможет...

Перевод с Паскаль на С++
Привет всем.Помогите перевести с паскаля на C++ этот код: const n = 100; var arr: array of integer; i, m, qty: byte;...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
04.04.2011, 10:00
Помогаю со студенческими работами здесь

Перевод з С++ в Паскаль))
#include &quot;stdafx.h&quot; #include &lt;iomanip&gt; #include &lt;iostream&gt; using namespace std; #define n 67 void main() { int p,q, a,i=0; ...

Перевод с Паскаль на С++
uses crt; var m, k: byte; begin write('m = '); readln(m); write('k = '); readln(k);

Перевод с Паскаль на С++
var S,x,i:integer; begin x:=1; S:=0; for i:=1 to 10 do begin S:=S+x; x:=x*2; end; write(S div 100, ',', S mod 100,'...

Перевод с Паскаль на С++
Помогите перевести с паскаля на C++ этот код: var s:string; i,c:integer; begin readln(s); c:=0; for i:=1 to...

Перевод с С++ на Паскаль
Нужно написать программу на C++, но мне удалось найти только вариант на паскале, его мы не изучали, помогите перевести. var a,b:real;...


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru