ЗАДАЧИ НА TURBO PASCALE
5-9 класс
|
1)Найти наибольшее среди 2 чисел
2)Для чисел a,b,c,d вывести на экран полусумму наибольшего и наименьшего из них.
Напишите пожалуйста программы для этих задач.
1) var a,b:integer;
begin
readln(a,b);
if a>b then writeln (a,'>',b);
if a<b then writeln (a,'<',b);
end.
2)
Другие вопросы из категории
Требуется расчитать периметр прямоугольного треугольника с углом 30 градусов,по заданному катету лежащему против угла 30 градусов
http://prntscr.com/5gsh70
2. чему будет равно значение, вычисленное по формуле =СУММ (B1:C4) +F2*E4 - A3
НУЖНО с Basic !!!!
составьте блок-схему алгоритма и программу вычисления суммы всех трехзначных чисел , кратных 5!!
нужно с if
Читайте также
Дано целое число, если оно двузначное, то умножить на 2, в противном случае вычесть 10.
f3.
Дано целое число. Если оно является положительным, то прибавить к нему 1; если отрицательным, то вычесть из него 2; если нулевым, то заменить его на 10. Вывести полученное число.
f5.
Даны три целых числа. Найти количество положительных и количество
отрицательных чисел в исходном наборе.
f15.
Даны три числа. Найти сумму двух наибольших из них.
Плис, напишите программу на turbo pascal
прежним,если это не так. 2)Даны 3 числа, возвести в квадрат те из них, значения которых не отрицательны, а отрицательные оставить без изменений