Реферат : Программирование. Контрольная работа 


Полнотекстовый поиск по базе:

Главная >> Реферат >> Информатика, программирование


Программирование. Контрольная работа




Контрольная работа

Составьте программу, определяющую является ли вводимое с клавиатуры целое число

положительным или отрицательным.

Текст программы:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type

TForm1 = class(TForm)

private

public

end;

var

Form1: TForm1;

x: longint;

implementation

label start,fin;

begin

start:

write('Vvedite celoe chislo =');

readln(x);

if x>0 then begin

writeln('Dannoe chislo >0');goto fin; end;

if x<0 then begin

writeln('Dannoe chislo <0');goto fin; end;

if x=0 then writeln('Dannoe chislo =0');

fin:end.

Задание №2

Напишите программу, которая запрашивает день недели и, если введённый день

является субботой или воскресеньем, выдаёт сообщение: "Сегодня выходной!"

Текст программы:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type

TForm1 = class(TForm)

private

public

end;

var

day: shortstring;

Form1: TForm1;

implementation

begin

write('Vvedite den nedeli:');

readln(day);

if day='Monday' then write('Go to work');

if day='Tuesday' then write('Go to work');

if day='Wednesday' then write('Go to work');

if day='Thursday' then write('Go to work');

if day='Friday' then write('Go to work');

if day='Saturday' then write('Have some fun');

if day='Sunday' then write('Have some fun') else Writeln('Vvedeno nepravilnoe

znachenie');

end.

Задани №3

Вычислите значение функции Z(x,y) при x=15,32245; y=5,32411 с максимальной

точностью. Вид функции Z(x,y) соответствует заданию 1 к Лабораторной работе №1

(по вариантам).

Текст программы:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type

TForm1 = class(TForm)

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

x,y,z: extended;

implementation

{$R *.DFM}

label vano;

begin

x:=15.32245;y:=5.32411;

vano:

if 2*x*x-4*y*y*y=0 then

begin

writeln('Pri dannix znacheniax X i Y funkcia ne imeet reshenia');

goto vano;end;

z:=(cos(x)*(1-sin(y)))/(2*x*x-4*y*y*y);

write('Otvet :',z);

end.

Задание №4

Составьте программу, которая запрашивает две строки текста и определяет включает

ли первая строка текст введённый во вторую строку.

Текст программы:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type

TForm1 = class(TForm)

private

public

end;

var

cut,text1,text2:shortstring;

x,t1,t2: smallint;

Form1: TForm1;

implementation

label fin;

begin

write('Vvedite 1-u stroku texta:');

readln(text1);

write('Vvedite 2-u stroku texta:');

readln(text2);

t1:=length(text1);t2:=length(text2);

if t1<t2 then

begin

writeln('2 stroka > 1-oy, chto ne dopustimo');

goto fin;end;

for x:=1 to t1-t2+1 do

begin

cut:=copy(text1,x,t2);

if cut=text2 then

begin

writeln('stroka 1 vkluchaet v sebia stroku 2');

goto fin;end;

end;

writeln('stroka 1 ne vkluchaet v sebia stroku 2');

fin:end.

Похожие работы:

  • Контрольная работа по дисциплине «Управление персоналом»

    Реферат >> Менеджмент
    Контрольная работа по дисциплине «Управление ... организационных, экономических и других аспектах своей работы, овладевать смежными специальностями, и даже ... знать и язык программирования, и технологию сварки металла, и особенности работы операторов котельных. ...
  • Основы алгоритмизации и программирования (кр№1, вар1)

    Реферат >> Информатика, программирование
    ... автоматизированных систем управления (АСУ) ПРОГРАММИРОВАНИЕ Контрольная работа №1 Дата выполнения работы: 04.08.2003 Дата ... :__________________ Подпись преподавателя:___________ 2003 г. Контрольная работа № 1 № варианта – 1. Задание: Задан массив чисел ...
  • Программирование на Java

    Контрольная работа >> Информатика, программирование
    Контрольная работа Программирование на Java (теория) СОДЕРЖАНИЕ 1. ... в отличие от большинства других языков программирования, для этих целей могут также ... ЛИТЕРАТУРЫ Арнольд К., Гослинг Дж. «Язык программирования Java» Хорстманн К.С., Корнелл Г. « Java 2. ...
  • Программированное обучение

    Реферат >> Педагогика
    ... ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ ПЕДАГОГИЧЕСКИЙ ФАКУЛЬТЕТ КОНТРОЛЬНАЯ РАБОТА на тему: «Программированное обучение» ВЫПОЛНИЛ: Студент: ... управляемое усвоение Достоинства и недостатки программированного обучения Программирование обучение имеет ряд достоинств: ...
  • Приемы программирования на JavaScript

    Контрольная работа >> Информатика, программирование
    Контрольная работа 12 Тема: «Приемы программирования на JavaScript» Пример ... расширение спецификации URI для программирования сценариев просмотра гипертекстовых документов ... отступления начнем рассматривать приемы программирования на JavaScript в соответствии ...
  • Решение задач линейного программирования

    Контрольная работа >> Информатика, программирование
    Контрольная работа №2 Задание 1 Решение задач линейного программирования графическим ... линейного программирования В результате решения задачи линейного программирования были ... многоэтапных задач методом динамического программирования. Индивидуальное задание. В ...
  • Программирование на языке Java Script

    Контрольная работа >> Информатика, программирование
    ... Кафедра «Информатика и системы управления» Контрольная работа По дисциплине “Web технологии” ... интересующую его web страницу. Системой работы с ссылками, т.е. с гипертекстом, является ... фона. Литература Картузов А.В. Программирование на языке JAVA 2002 г. ...
  • Программирование микроконтроллера

    Контрольная работа >> Информатика, программирование
    ... АВИАЦИИ» Кафедра радиотехнических устройств Контрольная работа по дисциплине «Микропроцессорные ... 0043 0044 0045 Задание на контрольную работу Сложить два числа 17, ... . Пособие по изучению дисциплины и выполнению контрольных работ. – М.: МГТУ ГА, 2008. – ...
  • Банковский маркетинг и эффективность работы обменного пункта

    Реферат >> Маркетинг
    Контрольная работа стр. 31 Вопрос 24. ... исследования операций, известных как линей­ное программирование, а это приведёт к излишнему удорожанию ... на методах исследования операций, линейного программирова­ния и т.д. Рассмотрим схему ситуационного анализа ...
  • Контрольная работа по маркетингу

    Реферат >> Маркетинг
    ... и конечных целей маркетинговой работы на пред­приятии могут создаваться ... программно-целевое планирование линейное программирование теория массового обслуживания теория ... последовательность и взаимозависимость отдельных видов работ или операций в рамках какой ...