делится ли число а на число b без остатка? написать в виде разветвляющего алгоритма.
5-9 класс
|
program pr;
uses crt;
Var a,b:integer;
Begin
Writeln('vvedite a,b');
readln(a);
readln(b);
if a mod b=0 then Writeln('da')
else Writeln('not');
readln;
end.
Другие вопросы из категории
Пожалуйста умные дети,где же вы??
2.Условный оператор(ветвление)
Нарисуйте блок-схему.Дано два числа.Верно ли, что он равны?
3.Циклы
Напишите программу на Паскале. Выведите на экран табицу умножения на 4 в виде 1+4=4,2+4=8,....9*4=36.
4.Одномерные массивы
Напишите программу на Паскале.Подсчитайте количество максимальных элементов массива А [1..12].
5.Двумерные массивы
Напишите программу на Паскале. создать массив случайны чисел В[1..6,1..6].Все элементы массива, расположенные выше главной диагонали сделать равными О.Вывести исходный и исправленный массивы.
Читайте также
Сначала строим информационную модель устно.
Во-первых, вводятся числа А и В.
Находим остаток от деления числа А на число В.
Если остаток от деления равен нулшю, то выводим результат: Число А делится на число В без остатка
Иначе
Результат – Число А делится на число В с остатком.
ое число будет на единицу больше утроенного исходного числа. Найдите исходное число.