h1

Программа вычисления произведения k натуральных чисел, кратных m и не превышающих n

Февраль 26, 2010

Лабораторная работа №2 по предмету «Метрология качество ПО»: «Исследование качества программ, написанных на языках программирования высокого уровня».

Задание звучало следующим образом: составить алгоритм и программу вычисления произведения k натуральных чисел, кратных m и не превышающих n. Известно, что m, n — натуральные. Решить приведённую  задачу на 3 трех языках программирования и оценить качество сделанных программ, а также провести сравнительную характеристику.

После написания программ выяснилось, что лабораторную эту делать не нужно было, поэтому сравнительную характеристику не составлял. Однако по моему сугубо субъективному мнению: быстрее компилирует программу паскаль, затем делфи, затем с++, быстрее выполняется программа, скомпилированная на паскале, затем на с++, затем на делфи. Ну и к вопросу о трех языках программирования, конечно же паскаль и делфи это один язык, но кроме паскаля, делфи и с++ других языков я еще не изучил поэтому пришлось так вот смухлевать.

Собственно код:

Paskal:

uses crt;
var i,m,n,k: integer;
begin
clrscr;
writeln(‘vvedite m:’);
readln(m);
writeln(‘vvedite n:’);
readln(n);
k:=1;
for i:=m to n do
begin
if (i mod m)=0 then k:=k*i;
end;
writeln(‘proizvedenie ravno ‘,k:6);
readkey;
end.

Delphi:

program Project2;
{$APPTYPE CONSOLE}
uses
SysUtils;
var i,m,n,k: integer;
begin
{ TODO -oUser -cConsole Main : Insert code here }
writeln(‘vvedite m:’);
readln(m);
writeln(‘vvedite n:’);
readln(n);
k:=1;
for i:=m to n do
begin
if (i mod m)=0 then k:=k*i;
end;
writeln(‘proizvedenie ravno ‘,k:6);
readln;
end.

C++:

#include <vcl.h>
#include <iostream.h>
#pragma hdrstop
//———————————-
#pragma argsused
void main(void)
{
int m,n;
cout <<«Vvedite m» <<endl; //kratnie
cin >>m;
cout <<«Vvedite n» <<endl; //colichestvo
cin >>n;
int i;
int k=1;
for (i=1; i<=n; i++)
{
if (i%m==0) k=k*i;
}
cout <<«Proizvedenie ravno » <<k;
cin >>k;
}

Реклама

Добавить комментарий

Заполните поля или щелкните по значку, чтобы оставить свой комментарий:

Логотип WordPress.com

Для комментария используется ваша учётная запись WordPress.com. Выход / Изменить )

Фотография Twitter

Для комментария используется ваша учётная запись Twitter. Выход / Изменить )

Фотография Facebook

Для комментария используется ваша учётная запись Facebook. Выход / Изменить )

Google+ photo

Для комментария используется ваша учётная запись Google+. Выход / Изменить )

Connecting to %s

%d такие блоггеры, как: