«Условный
5-9 класс
|
оператор». Написать программу на языке Паскаль:
Даны четыре числа. Определить количество чисел,
которые больше 10.
var a,b,c,d:integer;
begin
writeln('Введите первое число');
readln(a);
writeln('Введите второе число');
readln(b);
writeln('Введите третье число');
readln(c);
writeln('Введите четвертое число');
readln(d);
if a > 10 then writeln('Число ',a,' больше 10');
if b > 10 then writeln('Число ',b,' больше 10');
if c > 10 then writeln('Число ',c,' больше 10');
if d > 10 then writeln('Число ',d,' больше 10');
end.
Другие вопросы из категории
Writeln (сумма a и b=',a и b);
сколько раз различаются информационные объемы этих текстов?
1. Sin (x)- 5* SQR(x/(y+1))
Написать на машинном языке:
2. Корень из Х - 5х в квадрате делить на хy
Читайте также
if a<5 then c:=1
else if a>5 then c:=2
else c:=3
какое значение имеет переменная a, если в результате выполнения условного оператора переменной c присваиваетсязначение 3?
if a<5 then c:=1
else if a>5 then c:=2
else c:=3
Какое значение имеет переменная a , если в результате выполнения условного оператора переменной c присваивается значение 3?
Составить блок-схему и программу к задаче:
В компьютер вводят два целых числа. Если а больше b, то вывести сообщение "Наибольшее число="; а иначе вывести сообщение "Наибольшее число="; b
печатающем 64 символа в секунду?
2. Что такое оператор присваивания?
3. По каким правилам определяется порядок выполнения операций в арифметическом выражении?
4. Полная и неполная форма условного оператора?