МАТЕМАТИЧЕСКИЕ ОСНОВЫ ИНФОРМАТИКИ
Среда, 14.04.2021, 17:40
ГлавнаяРегистрацияВход Приветствую Вас Гость | RSS

Меню сайта

Категории раздела
Линейный алгоритм [2]
Условный оператор if [3]
Оператор выбора [1]
Операторы цикла [2]
Целочисленное деление div и mod [2]
Генератор случайных чисел [1]
Практика [5]
Это интересно [2]
ЗАДАНИЕ 3 [1]

Наш опрос
Какой язык программирования Вы изучаете
Всего ответов: 991

Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0

Форма входа


Главная » Файлы » ВИДЫ АЛГОРИТМОВ » Практика

3.4 Тест на сложение
16.12.2012, 22:25

3.4 Тест на сложение

У Маши есть младший брат Миша, который учится решать примеры на выполнение арифметических действий. Чтобы ему помочь, Маша решила написать программу, которая бы сама придумывала пример и сообщала Мише верно ли он решил.

Задание 1:

Маша написала две программы, но не может разобраться с ними, помогите Маше и ответьте на вопросы:

1. Что означает randomize,
2. Чему будет равна переменная после выполнения действия:

p:= int((random*b)+a)?

3. Какую программу 1 или 2 лучше использовать  и почему?


Задание 2:

Скопируйте программы (тесты) на свой компьютер, запустите в PascalABC, проверьте работоспособность программ, ответьте на вопросы.

Придумайте и напишите свою программу для проверки уровня знаний выполнения арифметических действий.


Программа 1

var a,b,p, m: real;

i, k: integer;

begin

cls;

randomize;

a:=1;

b:=100;

p:= int((random*b)+a);

m:= int((random*b)+a);

writeln (p, ' + ',m);

writeln ('сложи два числа ');

for i:=1 to 5 do

begin

read (k);

if p+m = k then writeln ('молодец');

end

end.

 

 Программа 2

var a,b,p, m: real;

k: integer;

begin

cls;

randomize;

a:=1;

b:=100;

p:= int((random*b)+a);

m:= int((random*b)+a);

writeln (p, ' + ',m);

writeln ('сложи два числа ');

while p+m <> k do

read (k);

if p+m = k then writeln ('молодец');

end.


Категория: Практика | Добавил: i_elf
Просмотров: 1010 | Загрузок: 0 | Рейтинг: 0.0/0
Всего комментариев: 0
Имя *:
Email *:
Код *:
Поиск

Друзья сайта
  • Творческий учитель
  • Сайт ООАКМР
  • Школьный сайт
  • Информатика учебник
  • МОИ

  • Copyright MyCorp © 2021 Сделать бесплатный сайт с uCoz