Pascal, Delphi, C++
215 / 128 / 91
Регистрация: 01.12.2012
Сообщений: 628
1

ЕСТЬ КОД НУЖЕН ВВОД И ВЫВОД В ФАЙЛ СДЕЛАТЬ

09.04.2013, 19:19. Показов 542. Ответов 7
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
заполнить массив змейкой начиная с 1 элемента пример
1 2 3 4
8 7 6 5
9 10 11 12
.............
РЕЗУЛЬТАТ ЗАПИСАТЬ В ФАЙЛ И ВЫВЕСТИ НА ЕКРАН ИЗ ФАЙЛА
НЕОБХОДИМО ИСПОЛЬЗОВАТЬ ПРОЦЕДУРЫ
ЕСЛИ НАДО ЕСТЬ КОД НА пАСКАЛЕ:
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
uses crt;
var i,j,k,n,m: integer;
    a: array [1..100,1..100] of integer;
begin
     writeln('vvedite n =');
     readln(n);
     writeln('vvedite m =');
     readln(m);
     k:=0;
          for i:=1 to n do
               if i mod 2=1 then
                   for j:=1 to m do
                       begin
                            inc(k);
                            a[i,j]:=k;
                             end
               else
                   for j:=m downto 1 do
                        begin
                             inc(k);
                             a[i,j]:=k;
                        end;
     for i:=1 to n do
         begin
              for j:=1 to m do
                  write(a[i,j]:4);
                  writeln;
         end;
end.
И СИФАЙЛЫ НЕ ЗНАЮ КАК)
C++
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
#include <stdafx.h>
#include <iostream>
using namespace std;
 
int main()
{
int const n=11;
 int A[n][n];
 int i=1,j,k,p=n/2;
 for(k=1;k<=p;k++)/*Цикл по номеру витка*/
 {
 for (j=k-1;j<n-k+1;j++) A[k-1][j]=i++;/*Определение значений верхнего гор столбца*/ 
 for (j=k;j<n-k+1;j++) A[j][n-k]=i++;/* --//-- По правому вертикальному столбцу*/
 for (j=n-k-1;j>=k-1;--j) A[n-k][j]=i++;/* --//-- по нижнему горизонтальному столбцу*/ 
 for (j=n-k-1;j>=k;j--) A[j][k-1]=i++;/* --//-- по левому вертикальному столбцу*/
 }
 if (n%2==1) A[p][p]=n*n;
 for(i=0;i<n;i++)
  for(j=0;j<n;j++)
  {
   printf(" %4d ",A[i][j]);
   if(j==n-1) printf("
       ");
  }   
}
желательно сделать скрин результата в С++ и кинуть сюда)

Добавлено через 2 минуты
вверх)

Добавлено через 27 минут
вверх
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.04.2013, 19:19
Ответы с готовыми решениями:

Сделать вывод и ввод в файл
#include &lt;iostream.h&gt; #include &lt;conio.h&gt; #include &lt;stdlib.h&gt; struct ilist ...

Заменить в программе, переводящую строку в двоичный код, консольный ввод/вывод на файловый ввод/вывод
Добрый день! Помогите, пожалуйста, с программой. Программа считывает строку с клавиатуры и...

Ввод структурированных данных в файл и вывод данных из этого файла на экран (сделать хранилище данных в файле)
Здравствуйте) помогите написать программу, осуществляющую ввод структурированных данных в файл и...

Ввод/вывод в файлы txt (код есть) Си
Салют! Есть код, если кратко - массив a считывается из файла in, еще дан массив b, где b равно...

7
14 / 0 / 1
Регистрация: 09.04.2013
Сообщений: 9
09.04.2013, 19:30 2
C++
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
#include <stdafx.h>
#include <iostream>
using namespace std;
 
int main()
{
    FILE* pFile;
    // Открываем файл
    pFile = fopen( "output.txt", "w");
    if(!pFile)
    {
        printf("Ошибка при создании файла\n");
        return 1;
    }
 
    int const n=11;
    int A[n][n];
    int i=1,j,k,p=n/2;
    for(k=1;k<=p;k++)/*Цикл по номеру витка*/
    {
        for (j=k-1;j<n-k+1;j++) A[k-1][j]=i++;/*Определение значений верхнего гор столбца*/ 
        for (j=k;j<n-k+1;j++) A[j][n-k]=i++;/* --//-- По правому вертикальному столбцу*/
        for (j=n-k-1;j>=k-1;--j) A[n-k][j]=i++;/* --//-- по нижнему горизонтальному столбцу*/ 
        for (j=n-k-1;j>=k;j--) A[j][k-1]=i++;/* --//-- по левому вертикальному столбцу*/
    }
    if (n%2==1) A[p][p]=n*n;
    for(i=0;i<n;i++)
        for(j=0;j<n;j++)
        {
            // printf(" %4d ",A[i][j]);
            // if(j==n-1) printf("\n");
            fprintf( pFile, " %4d ",A[i][j]);
            if(j==n-1) fprintf( pFile, "\n");
        }   
 
    // Закрываем файл
    fclose(pFile);
}
0
Pascal, Delphi, C++
215 / 128 / 91
Регистрация: 01.12.2012
Сообщений: 628
09.04.2013, 20:13  [ТС] 3
можно скрин результата?

Добавлено через 4 минуты
Teor??

Добавлено через 4 минуты
Teor, ееей??

Добавлено через 4 минуты
сделайте скрин сишки сейчас нет скрин надо!!!!
0
14 / 0 / 1
Регистрация: 09.04.2013
Сообщений: 9
09.04.2013, 20:18 4
Я щас только понял какой бред написал
вот скрин этого бреда )
Миниатюры
ЕСТЬ КОД НУЖЕН ВВОД И ВЫВОД В ФАЙЛ СДЕЛАТЬ  
0
Pascal, Delphi, C++
215 / 128 / 91
Регистрация: 01.12.2012
Сообщений: 628
09.04.2013, 20:42  [ТС] 5
а без бреда можно и скрин сишного экрана?
0
14 / 0 / 1
Регистрация: 09.04.2013
Сообщений: 9
09.04.2013, 21:40 6
вот накатал некоторый код с динамическим массивом
воспринимает ширину/высоту от 1 до 1000
выводит на экран и в файл

C++
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
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
//#include <stdafx.h>
#include <iostream>
#include <stdlib.h>
#include <conio.h>
using namespace std;
 
int main()
{
    // n - количество по горизонтали
    // m - количество по вертикали
    int n, m, counter = 1;
    bool toRight = true;
 
    // Вводим n
    cout << "Enter n:";
    do
    {
        cin >> n;
    }
    while(!(n > 0 && n <= 1000));
 
    cout << "Enter m:";
    do
    {
        cin >> m;
    }
    while(!(m > 0 && m <= 1000));
 
    int* p = (int*)calloc( (n*m), sizeof(int) );
 
    // Заполнение масива
    for( int i = 0; i < m; i++)
    {
        if(toRight)
        {
            for ( int j = 0; j < n; j++)
            {
                *(p + (i*n) + j) = counter;
                ++counter;
            }
        }
        else
        {
            for ( int j = n - 1; j >= 0; j--)
            {
                *(p + (i*n) + j) = counter;
                ++counter;
            }
        }
 
        toRight = !toRight; 
    }
 
    // создание файла
    FILE* pFile = fopen( "output.txt", "w");
    if (!pFile)
    {
        printf( "create file error\n");
        _getch();
        //free(p);
        //return 1;
    }
 
    // вывод
    for( int i = 0; i < m; i++)
    {
        for ( int j = 0; j < n; j++)
        {
            // вывод в файл
            if(pFile) fprintf( pFile, "\t%d", (*(p + (i*n) + j)) );
            // и на экран
            printf( "\t%d", (*(p + (i*n) + j)) );
        }
        if(pFile) fprintf( pFile, "\n");
        printf( "\n");
    }
 
    // освобождение
    free(p);
    fclose(pFile);
 
    _getch();
}
прикрепил примеры скринами
Миниатюры
ЕСТЬ КОД НУЖЕН ВВОД И ВЫВОД В ФАЙЛ СДЕЛАТЬ   ЕСТЬ КОД НУЖЕН ВВОД И ВЫВОД В ФАЙЛ СДЕЛАТЬ  
0
Pascal, Delphi, C++
215 / 128 / 91
Регистрация: 01.12.2012
Сообщений: 628
09.04.2013, 22:02  [ТС] 7
благодарствую

Добавлено через 5 минут
alt+print screen snimok ekrana)
0
14 / 0 / 1
Регистрация: 09.04.2013
Сообщений: 9
09.04.2013, 22:05 8
спасибо, вкурсе...
просто это снимок активного окна, а я хотел чтоб и блокнот и консоль на одном была
впринципе не суть...
0
09.04.2013, 22:05
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.04.2013, 22:05
Помогаю со студенческими работами здесь

Сделать ввод/вывод данных в файл
Задание: В приведенной задаче предполагается, что все данные хранятся в некотором текстовом файле....

У меня есть файл и внутри этого файла есть код, я хочу его открыть в IDLE питон так, чтобы внутри код вывести
У меня есть файл и внутри этого файла есть код, я хочу его открыть в IDLE питоне так, чтобы код...

Запросить ввод имени файла и если файл есть, создать другой файл
Прошу помощи. Как на паскаль написать программу, которая запрашивает ввод имени файла и если файл...

Вывод файла, ввод в файл новых строк и сохранение этого в файл
у меня есть файл, с property и мне в него надо записать новые пары идентификатор = значение я...


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

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru