Напишите программу нахождения отрицательного числа из двух чисел
5-9 класс
|
var
a,b:integer;
beginread(a,b);
if a <= 0 then
writeln(a);
if b <= 0 then
writeln(b);
end.
Другие вопросы из категории
мегабайтах при кодировани в кодах unicod и ascii
поля (исходное положение графического исполнителя – произвольное) и алгоритм не зацикливался:
ПЕРЕХОД
Поворот
ПЕРЕХОД
Поворот
Пока впереди не край
нц
ЛИНИЯ
Поворот
кц
Процедура ПЕРЕХОД
пока впереди край повторять
нц
прыжок
кц
конец процедуры
Процедура ЛИНИЯ
Пока впереди не край повторять
нц
шаг
кц
конец процедуры
1. Вывести последовательность чисел на экран 12, 24, 36, ... , N
2. Найти сумму чисел 6, 12, 18, ... , N
Читайте также
числа, количество чисел неизвестно (но не менее двух), ввод последовательности заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Значения чисел не превышают 30000. Программа должна вывести одно число: произведение двух чисел, значения которых в данной последовательности наибольшие
натуральные числа A , B, где B>A. Напишите программу последовательность натуральных чисел от A до B, включающая A и B.
Пожалуйста помогите !!!!!!!!
программы подаются целые числа, количество введенных чисел неизвестно, последовательность заканчивается числом 0 (0 - признак окончания ввода, не является членом последовательности). Количество чисел не превышает 100. Введенные числа по модулю не превышают 300. Программа должна вывести сумму и количество чисел, кратных 17, или вывести NO, если таких числе в последовательности нет
1. Составьте программу для определения большего из двух чисел х или у
2. Составьте программу для нахождения площади прямоугольника по заданным сторонам а и б