последовательность чисел

Ребята помогите сделать программу, итоговая по практике!

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

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

 

Вообщем спросил у куратора смысл этой программы, и вот что мне ответили:

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

 

киньте ктонить свой скайп пож или напишите ОЧЕНЬЬЬЬ ПРОШУ

 

Обьясни конкретней задание....

 

не пойму зачем такое задания дает,людям который даже не осмыслит о программирование им то трудно будит ...

чем писат эту херну напиши им какой нит прогу =\

 

Ну преподы совершенно не виноваты что люди шли учится по принципу - Оооо.. Это ща круто. Вон Били милиарды крутит.


C++

Code:

#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!" << endl;
    return 0;
}

 

Например нас просят ввести число n и m
Вводим n: 1 2 3 4 5 6 7 8 9 10 11 12 13 и т.д
Водим m: 10 (или 1 2 3 4 5 6 7 8 9 10)
И в текстовой файл должны добавится чисел не более m, то есть 1 2 3 4 5 6 7 8 9 10




вот весь смысл программы

 

кто нибудь поможет сделать?

 

Shkiper2009 тебе бля уже зделали на с++ перведи в паскаль да и всё)
(ну или обратись в соответствующий раздел)

 

такой флуд в теме вообщееееее... Besi те чо вообще надо было?? я будто без тебя не знаю что надо перевести и где что написано!!!!!! Я попросил на ABS Pascal блин, вот кто нибудь точно знает как написать что сложно чтоли!!

 

Ты не оборзел? тебе программу готовую дали за СПАСИБО а ты еще права тут качаеш. Могли бы вообще ниче не делать. Не устраивает такая халява. Дуй в раздел О работе и там уже будешь говнить исполнителю что тебя устраивает и что нет.

 

За 5 баксов сделаю на ABS Pascal

 

ТС глупый.

 

мде.... вобще оборзел
иди бл* к преподу и говори, я дыбил незнаю как зделать какраз для тебя тс ета фраза