Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.58/19: Рейтинг темы: голосов - 19, средняя оценка - 4.58
0 / 0 / 0
Регистрация: 19.01.2013
Сообщений: 11
1

Написать программу "тест по таблице умножения"

25.02.2013, 12:44. Показов 3660. Ответов 1
Метки нет (Все метки)

Написать программу "тест по таблице умножения".Программа должна спрашивать у пользователя ответ на произведение двух чисел.Оба числа загадываются компьютером автоматически с помощью randomize(диапазон от 0 до 10).
После того как пользователь введет ответ,программа должна оценить его правильность("Правильно" или "Неверно") и спросить у пользователя "Продолжить тест?(д/н)". Если пользователь нажимает "д" то программа выполняется заново,если "н" программа завершает работу.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.02.2013, 12:44
Ответы с готовыми решениями:

Написать программу для вычеркивания из слова Х всех букв "р" перед которыми стоит буква "а"
написать программу для вычеркивания из слова Х всех букв "р" перед которыми стоит буква "а"

Написать программу замены в тексте всех букв "а" на "о" и наоборот.
Я не могу понять саму суть работы в Pascal, но нужно сдать 11 лаб решил только 3, а дальше мозг...

Составить программу, которая из слов "мышь", " сканер", "слива" получает слово "клавиша"
Помогите пожалуйста. Необходимо составить программу, которая: из слов "мышь", " сканер", "слива" ...

Написать программу проверки правильности написания сочетаний "жи", "ши"
Дан текст. Написать программу проверки правильности написания Сочетаний...

1
Модератор
63381 / 47074 / 32446
Регистрация: 18.05.2008
Сообщений: 114,106
25.02.2013, 15:06 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var a,b,c,d:integer;
    w:char;
begin
randomize;
repeat
clrscr;
a:=random(11);
b:=random(11);
writeln(a,'x',b,'=');
c:=a*b;
write('Введите Ваш ответ: ');
readln(d);
if d=c then writeln('Правильно')
else writeln('Неверно');
writeln('Продолжить тест? д/н');
repeat
readln(w);
until w in ['д','н'];
until w='н';
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.02.2013, 15:06

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Составить программу для сложения, разности, умножения и деления "длинных" чисел
Нужно составить программу для сложения, разности, умножения и деления "длинных" чисел в Паскале!...

Составить программу которая получает из слова "принцип" слово "ципа" и "цирк"
Составить программу которая получает из слова "принцип" слово "ципа" и "цирк".

Составить программу для подсчета числа букв "А", "Б" и "В" в предложении.
Составить программу для подсчета числа букв "А", "Б" и "В" в предложении.

Напишите программу для проверки, есть ли в слове X буква "о". Если есть, то замените все буквы "о" на "ку"
ребятки, очень прошу помогите!!))) вот такую штуку надо сделать в паскале, а я не очень в этом...

Составить фразу "программное обеспечение" из слов "программист", "оборот", "анчоус", "измерение"
Составить фразу "программное обеспечение" из слов "программист", "оборот", "анчоус",...

Составить фразу "письменный стол" из слов "тесненный", "полка", "речь", "миф".
1) Составить фразу "письменный стол" из слов "тесненный", "полка", "речь", "миф". 2) Вывести...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.