Усовершенствуйте программу tablmul таким образом чтобы в результате выводилось сообщение

Усовершенствуйте программу ТablMul таким образом, чтоб в итоге выводилась оценка, поставленная воспитаннику. Аспекты для выставления оценок придумайте сами.
Помогите пожалуйста. Буду очень рада!))
Используйте:
1. Цикл с предусловием (цикл-пока):
While lt; логическое выражение gt; Do
lt; оператор gt;
2. Цикл с постусловием (цикл-до):

Repeat
lt; оператор gt;
Until lt; логическое выражение gt;

  • Егор Малявка
  • Информатика
  • 2019-02-12 02:56:13
  • 34
  • 1

Var
Ball: array[1..Size] of real;
Ocenka: array[1..Size] of integer;
Counter: integer;

while (Counter lt;= Size) do
begin
Write(‘Введите балл ‘, counter, ‘ ученика: ‘);
Readln(Ball[Counter]);
Counter := Counter + 1;
end;

Repeat
if (Ball[Counter] gt; 90) then
Ocenka[Counter] := 5

else if (Ball[Counter] gt;= 75) and (Ball[Counter] lt; 90) then
Ocenka[Counter] := 4

Анализ программ с помощью трассировочных таблиц. Видеоурок 10. Информатика 11 класс

else if (Ball[Counter] gt;= 50) and (Ball[Counter] lt; 75) then
Ocenka[Counter] := 3

else
Ocenka[Counter] := 2;

Counter := Counter + 1;

Until (Counter gt; Size);

for var i := 1 to Size do
Writeln(‘Оценка ‘, i, ‘ воспитанника: ‘, Ocenka[i]);

Рассмотрим приемы программирования циклов на Паскале. В § 13 рассказывалось о том, что существуют две циклические алгоритмические структуры: цикл с предусловием (цикл-пока) и цикл с постусловием (цикл-до). Были показаны способы описания циклических структур в блок-схемах и на Алгоритмическом языке. Форматы соответствующих операторов цикла в Паскале следующие.

Цикл с предусловием (цикл-пока):

Цикл с постусловием (цикл-до):

Различают циклы с заданным числом повторений и итерационные циклы.

Читайте также:
В каком модуле присутствуют функции для тестирования программы pdb distutils profile unittest

На примерах конкретных задач рассмотрим приемы программирования циклов.

В математике известно, что сумма следующего бесконечного числового ряда:

в пределе стремится к значению константы е = 2,71828182. Функция е х называется экспонентой, а логарифм по основанию е называется натуральным логарифмом: In x.

Если слагаемые в вычисляемом выражении обозначить так:

то обобщенная формула для i-гo элемента будет следующей:

Нетрудно увидеть, что между элементами данной последовательности имеется зависимость:

Такая зависимость называется рекуррентной зависимостью, а соответствующая числовая последовательность — рекуррентной последовательностью. Данная рекуррентная последовательность может быть описана следующей ветвящейся формулой, которая называется рекуррентной формулой:

14 Задание ЕГЭ Информатика Исполнитель Редактор

Циклы с заданным числом повторений

Пример 1. Дано целое положительное значение N. Требуется вычислить сумму:

Ниже приводятся два варианта программы решения этой задачи. В первом варианте используется цикл с предусловием, во втором — цикл с постусловием.

Обратите внимание на то, как цикл с предусловием преобразуется в цикл с постусловием — условие цикла помещается после тела цикла и заменяется на противоположное:

И тот, и другой цикл повторят свое выполнение (N + 1) раз. Переменная i выполняет роль не только знаменателя в дроби 1/i!, но и является счетчиком числа повторений цикла. Такие переменные называются параметрами цикла. И еще: в цикле с постусловием служебные слова Repeat и Until сами выполняют роль операторных скобок. Поэтому писать Begin и End здесь не требуется.

Выполнение этих программ на компьютере для значения N = 7 приводит к следующему результату: Е=2, 7182539.

Для программирования циклов с заданным числом повторений при постоянном шаге изменения параметра цикла в Паскале существует цикл с параметром. Вот как выглядит программа решения той же задачи с использованием цикла с параметром:

Читайте также:
Программы для усиления звука на Андроид планшет

  1. Вычисляются значения и . Это делается только один раз при входе в цикл.
  2. Параметру цикла присваивается значение .
  3. Значение параметра цикла сравнивается со значением . Если параметр цикла меньше или равен этому значению, то выполняется тело цикла ( ), в противном случае выполнение цикла заканчивается.
  4. Значение параметра цикла изменяется на следующее значение в его типе (для целых чисел — увеличивается на единицу); происходит возврат к пункту 3.

Оператор цикла For объединяет в себе действия, которые при использовании цикла While выполняют различные операторы: присваивание параметру начального значения, сравнение его с конечным значением, изменение значения параметра на следующее.

  • параметр цикла не может иметь вещественного типа;
  • в теле цикла нельзя изменять переменную-параметр цикла;
  • при выходе из цикла значение переменной-параметра является неопределенным.

Рассмотрим пример программы, в которой в теле цикла будет присутствовать ветвление.

Пример 2. Составим программу проверки знаний учеником таблицы умножения. Компьютер задает ученику 10 вопросов на умножение чисел от 2 до 9. На каждое задание ученик вводит свой ответ, компьютер сообщает, верный ответ или нет.

Рис. 3.16. Блок-схема алгоритма из примера 2

На рисунке 3.16 приведена блок-схема такого алгоритма.

Обратите внимание на то, как отображается на блок-схеме цикл с параметром.

В этом алгоритме использована функция random (х), результатом выполнения которой является случайное целое число из диапазона от 0 до х — 1. Следовательно, выражение random (8)+2 принимает случайные значения от 2 до 9. Функция random называется датчиком случайных чисел.

На Паскале этот алгоритм программируется так:

А вот фрагмент интерфейса исполнения этой программы:

В программе используется стандартная процедура randomize. Ее исполнение производит установку случайного начального состояния датчика случайных чисел. Благодаря этому при повторном выполнении программы будут получаться разные последовательности случайных чисел.

Читайте также:
Интерфейс программы Microsoft powerpoint структура и требования к оформлению презентации

Var x,y,i,z,p,n:integer;
Begin
Randomize;
p:=0;
n:=0;
For i:= 1 to 10 do
Begin
x:=random(8)+2;
y:=random(8)+2;
WriteLn(‘Сколько будет ‘,x,’*’,y,’?’);
Read(z);
if z=x*y then
Begin
WriteLn(‘Правильно!’);
p:=p+1
End
else
Begin
WriteLn(‘Не правильно! ‘,x,’*’,y,’=’,x*y);
n:=n+1
End
End;
WriteLn(‘Количество правильных ов: ‘,p);
WriteLn(‘Количество неправильных ов: ‘,n);
End.

  • Сообщение о выдающемся спортсмене тюменской области
  • Сообщение об анютиных глазках
  • Сообщение об одном из героев движения сопротивления
  • Эль караколь обсерватория сообщение
  • Сообщение про фаст фуд

Источник: obrazovanie-gid.ru

Усовершенствуйте программу TablMul таким образом, чтобы в результате выводилась оценка, поставленная ученику. Критерии для

Как быстро выучить стихотворение наизусть? Запоминание стихов является стандартным заданием во многих школах.

Как научится читать по диагонали? Скорость чтения зависит от скорости восприятия каждого отдельного слова в тексте.

Как быстро и эффективно исправить почерк? Люди часто предполагают, что каллиграфия и почерк являются синонимами, но это не так.

Как научится говорить грамотно и правильно? Общение на хорошем, уверенном и естественном русском языке является достижимой целью.

  • Обратная связь
  • Правила сайта

Источник: www.soloby.ru

Усовершенствуйте программу TablMul (пример 2 данного параграфа) таким образом, чтобы в результате выводилось сообщение о количестве правильных и неправильных ответов

Var x,y,i,z,p,n:integer;
Begin
Randomize;
p:=0;
n:=0;
For i:= 1 to 10 do
Begin
x:=random(8)+2;
y:=random(8)+2;
WriteLn(‘Сколько будет ‘,x,’*’,y,’?’);
Read(z);
if z=x*y then
Begin
WriteLn(‘Правильно!’);
p:=p+1
End
else
Begin
WriteLn(‘Не правильно! ‘,x,’*’,y,’=’,x*y);
n:=n+1
End
End;
WriteLn(‘Количество правильных ответов: ‘,p);
WriteLn(‘Количество неправильных ответов: ‘,n);
End.

Источник: znanijam.net

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru