Основные конструкции языка программирования
Контрольная работа - Компьютеры, программирование
Другие контрольные работы по предмету Компьютеры, программирование
ваивается значение, определенное как .
2.Условие задачи на организацию циклических процессов
Требуетсяразработать обучающую программу, для любой предметной области. Предметная область должна содержать не менее трех обучаемых понятий. Для каждого из отобранных понятий предусмотреть несколько вариантов ответа. Предлагаемые варианты обучаемых понятий должны выдаваться на экран циклически, до получения правильного ответа. Предусмотреть подсчет числа ошибочных ответов и проставление оценки.
3.Распечатка программного кода
Program PrjObuch;:String;:Integer;:Boolean;:=False;:=0;FL= False Do(Skolkibaitam raven 1 Megabait);(variantyotvetov);(1000; 1024; 1000000; 8; 32; 64);(Vveditepravilnyyotvet);(Answer);(Answer = 1024)(Otvetveren);:=True;(otvetneveren);:=Mistake+1;;;:=False;FL= False Do(Skolkimegabaitam raven 1 Terabait);(variantyotvetov);(1024; 1048576; 32; 2048576; 1000000; 8);(Vveditepravilnyyotvet);(Answer);(Answer = 1048576)(Otvetveren);:=True;(otvetneveren);:=Mistake+1;;;:=False;FL= False Do(Skolikikilobaitam raven 1 Megabit);(variantyotvetov);(1024; 32; 256; 512; 100; 128);(Vveditepravilnyyotvet);(Answer);(Answer = 128)(Otvetveren);:=True;(otvetneveren);:=Mistake+1;;;(kolichestvooshibok, Mistake);Mistake=0 then Writeln (Otlichno);(Mistake=1) or (Mistake=2) then Writeln(Horosho);(Mistake=3) or (Mistake=4) then Writeln(udv);Mistake>4 then Writeln(neud);
Readln;..
4. Распечатка результатов выполнения
III.Постановка задач на обработку информации с использованием разветвленного алгоритма и циклических процессов
.Описание условия задачи
Разработать программу, предполагающую ввод последовательности вещественных чисел до появления 0 (0 - признак конца последовательности). Требуется рассчитать и вывести на экран среднее арифметическое данной последовательности чисел.
2.Распечатка программного кода
язык программирование паскаль ветвление
ProgramSr_arifm;
Var X,S: Real; N:Integer;:=1; S:=0;(Vvedite ,N,-e chislo (0 - konecposledovatelnosti) :);(X);x1(Sredneearifmeticheskoe = ,S/ (N-1):8:2)(Sredneearifmeticheskoe = ,0);;.
3. Распечатка результата выполнения
Используемая литература
1)Васильев В.В. Хливненко Л.В. "Практикум. Язык программирования Паскаль. Ветвления и циклы"
)Комлева Н.В., Смирнов А.А., Хрипков Д.В., Информатика и программирование, - М, центр ЕОАИ, 2008