Tema: Re: Rekuperatorius KB
Autorius: Paulius Zaleckas
Data: 2012-02-03 11:49:44
#include <stdio.h>

#define PIPE_LEN 10
#define INSIDE_TEMP 20.0f
#define OUTSIDE_TEMP -20.0f

int main()
{
	float a[PIPE_LEN], b[PIPE_LEN], air_out, air_in;
	int i;

	for (i = 0; i < PIPE_LEN; i++) {
		a[i] = INSIDE_TEMP;
		b[i] = OUTSIDE_TEMP;
	}

	for (;;) {
		for (i = 0; i < PIPE_LEN; i++) {
			float mid;

			mid = (a[i] + b[i]) / 2;
			a[i] = b[i] = mid;
		}

		air_out = a[0];
		air_in = b[PIPE_LEN - 1];

		for (i = 0; i < PIPE_LEN - 1; i++) {
			a[i] = a[i + 1];
			b[PIPE_LEN - 1 - i] = b[PIPE_LEN - 2 - i];
		}

		a[PIPE_LEN - 1] = INSIDE_TEMP;
		b[0] = OUTSIDE_TEMP;

		printf("\n% 6.2f\t|", air_out);

		for (i = 0; i < PIPE_LEN; i++)
			printf(" % 6.2f ", a[i]);

		printf("| % 6.2f\n% 6.2f\t|", INSIDE_TEMP, OUTSIDE_TEMP);

		for (i = 0; i < PIPE_LEN; i++)
			printf(" % 6.2f ", b[i]);

		printf("| % 6.2f\n", air_in);

		printf("Naudingumas: %6.2f%%", (air_in - OUTSIDE_TEMP) / (INSIDE_TEMP - OUTSIDE_TEMP) * 100);

		getchar();
	}
}
3Dastronomyagricultureaudioautosautos.audiautos.audioautos.binariesautos.bmwautos.clubautos.fordautos.hondacrxautos.japanautos.mercedesautos.opelautos.sportautos.volvoautos.vwaviaavia.binariesbankcardsbinariesbooksbuildingcinemacommercecomp.hardwarecomp.softwarecomp.lietuvinimascomp.networksculturedarbas.ieskaudarbas.siulaudesigneconomicselectronicsfaunafauna.aquafauna.binariesfishingflorafotofoto.binariesgamesgames.csgames.onlinegsmgurmanaihumourhumour.binariesinternetlawmicrosoftmotomusicmusic.binariesmusic.instrumentsmusic.LT.binariesnavigacijaphppoliticsprogrammingrpgsportstudyingsveikatatalktesttranslationtransportationtraveltravel.binariestvunixvideovideo.binarieswatersportswwwwww.flashpdaautos.supermama.ltmobiledarbasretro.3Dretro.agricultureretro.astronomyretro.audioretro.autosretro.autos.audiretro.autos.audioretro.autos.binariesretro.autos.bmwretro.autos.clubretro.autos.fordretro.autos.hondacrxretro.autos.japanretro.autos.mercedesretro.autos.opelretro.autos.sportretro.autos.supermamaretro.autos.supermama.ltretro.autos.volvoretro.autos.vwretro.aviaretro.avia.binariesretro.bankcardsretro.beosretro.binariesretro.booksretro.buildingretro.cinemaretro.commerceretro.compretro.comp.hardwareretro.comp.lietuvinimasretro.comp.networksretro.comp.softwareretro.cultureretro.darbasretro.darbas.ieskauretro.darbas.siulauretro.designretro.economicsretro.electronicsretro.e-vejasretro.faunaretro.fauna.aquaretro.fauna.binariesretro.fishingretro.floraretro.fotoretro.foto.binariesretro.gamesretro.games.csretro.games.onlineretro.games.rpgretro.genealogijaretro.gsmretro.gurmanairetro.humourretro.humour.binariesretro.internetretro.YZFretro.YZF.nebukretro.YZF.nebuk.netikintisretro.YZF.nebuk.netikintis.bukretro.YZF.nebuk.netikintis.buk.tikintisretro.lawretro.microsoftretro.mobileretro.motoretro.musicretro.music.binariesretro.music.instrumentsretro.music.LTretro.music.LT.binariesretro.navigacijaretro.newsretro.news.taisyklesretro.newuserretro.pdaretro.phpretro.politicsretro.programmingretro.rpgretro.sportretro.studyingretro.sveikataretro.talkretro.translationretro.transportationretro.travelretro.travel.binariesretro.tvretro.unixretro.videoretro.video.binariesretro.watersportsretro.wwwretro.www.flashdiylt.rkm.news.announcelt.rkm.news.newuser