Напечатать все двузначные числа сумма которых равна 12(Делать через турбо паскаль)
5-9 класс
|
Program random;
var
mo, my:shortint;
begin
mo:=-10;
my:=22;
while (mo+my=12) and (my<100) do begin
writeln(mo,' + ',my,' = 12');
mo:=mo-1;
my:=my+1;
end;
end.
То есть сумма отрицательного двухзначного и положительного?
Другие вопросы из категории
решите пожалуйста
очень нужно !!
неожиданно погас.Какое самоеименьшее количество кроссовок и носков должен вынести спортсмен на свет, чтобы точно попаласьодна пара одинаковых кроссовок и 2 носка одного цвета.Ответ запишите в виде двух чисел через запятую: K, N, K-количество кроссовок, N-количество носков.
Читайте также
Формат входных данных
В певой строке входного файла содержится одно целое число n(1<=n<=200).Во второй строке находятся n целых чисел a1,a2...aN (-1000<=ai<=1000)-елементы массива.
Формат выходных данных
В единственной строке выходного файла выведите одно слово "YES",если в этом массиве есть три числа сумма которых равна нулю.Иначе выведите "NO".
1 задание: Составьте программу вычисления количества двухзначных чисел,которые кратны 2 и 3.
2 задание: Составьте программу,выводящую на экран все двузначные числа,у которых первая цифра в два раза больше второй.
3 задание: Найдите количество двузначных чисел,которые делятся на сумму своих цифр.
P.S. Помогите пожалуйста! Очень нужно и срочно! Если можете,то нужно всё сделать; если же нет,то хотя-бы одну или две задачи. Заранее спасибо!!!)))
Заранее большое спасибо)
1) Определите и выведите на экран количество четырехзначных чисел, которые делятся без остатка одновременно на 5 и 11.
2) Найдите и выведите на экран все двузначные числа, у которых при умножения на 2 сумма цифр увеличивается на 5.