Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 02.04.2017
Сообщений: 2

Числа в паскале

03.04.2017, 13:38. Показов 860. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Среда программирования: ABS Pascal
Задача: С внешнего устройства (с клавиатуры,из файла) вводятся последовательно числа,количество которых велико и заранее неизвестно. Требуется сохранять и в процессе ввода каждого числа распечатывать не более m из последовательных введённых чисел (в порядке и поступления).
Помогите сделать в паскале этот код.

Заранее спасибо

Суть задачи:
Например в паскале выходит сообщение введите последовательность чисел n мы вводим 1 2 3 4 5 , эти числа должны записыватся в текстовой файл! Всё перую часть мне расказали далее нас просят ввести опять ввести n И В ТЕКСТОВЫЙ ФАЙЛ (уже в новый)ДОЛЖНЫ ПОПАСТЬ ЧИСЛА НЕ БОЛЬШЕ m ! Вот как то надо реализовать две части в одной программе! Кто может напишите пожалуйста



C++
Code:

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
#include <iostream>
#include <stdio.h>
using namespace std;
 
int main()
{
    FILE * file;
    int value,m;
 
    file = fopen("dig1.txt","w");
    printf("Enter Digits:\r\n");
 
    for(int i=0;i<10;i++){
 
    scanf("%d",&value);
    fprintf(file,"%d,",value);
 
    }
    fclose(file);
 
    file = fopen("dig2.txt","w");
    printf("Enter m:\r\n");
    scanf("%d",&m);
    printf("Enter Digits:\r\n");
 
    for(int i=0;i<10;i++){
 
    scanf("%d",&value);
    if(value<=m){
    fprintf(file,"%d,",value);
    }
    }
    fclose(file);
 
 
 
    cout << "Hello Achat!" <<end 1; 
    return 0;
    }
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
03.04.2017, 13:38
Ответы с готовыми решениями:

програма на числа в паскале
Нужно сделать програму в Паскале. Дано положительное число N. Проверить все ли цифры различны если нет, тогда сколько одинаковых.

Как в Паскале записать модуль числа
Народ как в Паскале записать модуль числа например 8...........

составить программу на паскале с возведением числа в 3 степень и имеющую закономерность
Подскажите пожалуиста,как составить программу на паскале с возведением числа в 3 степень и имеющую закономерность ....1 в 3=1; 2 в 3 = 3+5;...

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

Дано натуральное число N. Поменять порядок цифр числа N на обратный. в паскале
плиз

Написать программу в Паскале и составить блок-схему по заданию: Вывести «столбиком» следующие числа: 2,2; 2,4; 2,6; …, 4,0; 4,2
Написать программу в Паскале и составить блок-схему по заданию: Вывести «столбиком» следующие числа: 2,2; 2,4; 2,6; …, 4,0; 4,2

найти все трехзначные числа, у которых две цифры одинаковы через цикл while в Паскале пожалуйста
найти все трехзначные числа, у которых две цифры одинаковы через цикл while в Паскале пожалуйста

Дано N чисел. Сколько среди них отличны от последнего числа. Напишите, пожалуйста, на паскале с пояснениями
Напишите, пожалуйста, на паскале с пояснениями

Ввод бесконечного числа данных в Паскале
В Си есть такая функция while (scanf(&quot;%d&quot;, &amp;n)==1) {----} Есть ли его аналогия на Паскале?


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Как я обхитрил таблицу Word
Alexander-7 21.03.2026
Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a
AmbA 21.03.2026
без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
Программный отбор значений справочника
Maks 21.03.2026
Установка программного отбора значений справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru