Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Разработать алгоритм и составить программу на выбранном языке программирования ( Паскаль или Qbasic) для нахождения произведения цифр числа,

1-4 класс

полученного при умножении числа 12 на свой порядковый номер в списке группы.

Джад 29 янв. 2017 г., 8:49:55 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Gamora17
29 янв. 2017 г., 11:37:13 (7 лет назад)

var
  m, n, p: integer;

begin
  Write('Введите свой номер в группе: ');
  Readln(n);
  n := n * 12;
  p := 1;
  repeat
    m := n mod 10;
    p := p * m;
    n := n div 10
  until n = 0;
  Writeln('Результат ', p)
end.

Тестовое решение:

Введите свой номер в группе: 13
Результат 30


+ 0 -
Lifaa
29 янв. 2017 г., 13:21:27 (7 лет назад)

Можно подробней? Или этого ответа будет достаточно?

Ответить

Другие вопросы из категории

Помогите решить задачку:

В школе объявили день вежливости,каждый мальчик должен поцеловать в щечку девочку.
Всего при этом было 77 поцелуев.Сколько мальчиков было в 5А

Имеются 5 карточек на которых записана одна из букв: А Б Е Ж И . Надо составить последовательность из К карточек соблюдая правила:1) Любая

последовательность начинается буквой А
2)После гласной буквы не может снова идти гласная а после согласной - согласная
3)буквы в последовательности не должны повторяться
Запишите все допустимые последовательности карточек для К=5

Сколько битов в слове "байт"

Читайте также

спставьте программу на языке Pascal: Для ремонта кабинета шириной а метров, длиной b метров, высотой h метров необходимо купить в магазине

обоев. Площадь окон и дверей не учитывать. Известна стоимость одного рулона (86 рублей) обоев длиной 12 м и шириной 0,6 м. Составьте программу определяющую, какая сумма необходима для покупки обоев.

2)Дан фрагмент программы на языке паскаль, на вход которого поданы значения N=10 и M=2. Чему будет равно на выходе из фрагмента значение SUM?

SUM:=0; K :=M-1;

while K<N do

begin

for I(ай) := K-M+2 to K do SUM:=SUM+I;

K:=K+M;

end;

for I:=K-M+2 to N-1 do SUM:=SUM+I;

3)Программист Авсилий Кардов недавно получил банковскую карточку. Чтобы не забыть пароль к карточке, Василий решил построить его по алгоритму, а именно: пароль равен количеству чисел от 1 до 10000, не делящихся на 13 и 17. Чему равен пароль Васи?

4) Какой набор символов будет выведен в результате работы следующей программы?

function f(x:string; a:byte) :string;

begin

if a<=3 then

f:=copy(x, l, a)

else

f:=f(copy (x, 2, a), a-2;

end;

begin

writeln(f('abcdefghijklm',7));

end.

Составь алгоритм, цель которого вывести на экран наименьшее из значений переменных

B, C, D.
проверь правильность алгоритма для разных значений переменных
1)B=5 C=8 D=10 2) B=5 C=8 D=0 3) B=15 C=8 D=10
По учебнику информатика 4 класс Паутова и Биненсон

Отметь ложные высказывания.

1)Компьютер может исполнить алгоритмы написанные человеком на одном из языков программирования и введёные в его память.
2)Обьект исполняющий алгоритм это исполнитель алгоритма
3) Человек и компьютер могут быть исполнителями алгоритма
4)Человек может создавать алгоритмы и исполнять их.
5)компьтер может сам создавать алгоритмы.
5)Система команд исполнителя это набор команд которые способен выполнять любой исполнитель.
ПОМОГИТЕ СРОЧНО КАКОЕ ВЫЗКАЗЫВАНИЕ ТУТ ЛИШНЕЕ ИЛИ КАКИЕ ЛИШНИЕ??



Вы находитесь на странице вопроса "Разработать алгоритм и составить программу на выбранном языке программирования ( Паскаль или Qbasic) для нахождения произведения цифр числа,", категории "информатика". Данный вопрос относится к разделу "1-4" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.