Задача: Написать программу вычисления суммы всех двузначных чисел
5-9 класс
|
S=10+11+12+...+99
для QBasic
program vsum;
var
a,b,x : integer;
const
error = 'Error! Enter two-digit number.';
begin
Write('Enter a =');
ReadLn(a);
if (a <= 99) and (a >= 10) then
begin
Write('Enter b =');
ReadLn(b);
if (b <= 99) and (b >= 10) then
begin
x := a+b;
WriteLn('a + b = ',x);
end
else
Write(error);
exit;
end
else
WriteLn(error);
exit;
end.
Другие вопросы из категории
цифры стоящей на четной позиции отнять 2. затем вычеркнуть каждую 3 цифру. какой код должен получиться если применить данный алгоритм к последовательности цифр 1567327
A. THEN<серия оператора 1> ELSE<серия оператора 2>;
B. IF<условие> ELSE<серия оператора 2> end ;
C. IF<условие> THEN<оператор>;
D. ELSE<серия оператора 2> IF<условие>:
( A & B ) or ( A & B & not(C)) or (not(A or B).
or - это дизъюнкция.
население города на начало года составляло 0,62 мил
11101111211100101211110000211101000211101110211100100210000021110111121111000021110000021110001021110101121110010121110110121110100021111111121000002110100002111011102111011002111000002111011012111011102111000102111110112111101012
Читайте также
Дано целое число n, которое больше либо равно 0 и меньше либо равно 9.
Написать программу, вычисляющую сумму всех двузначных чисел в записи которых нет n.
2. Составить программу удвоения большего из двух чисел.
3. Написать программу вычисления произведения всех двузначных четных чисел.
4. Определить количество двузначных натуральных чисел, сумма цифр которых равна заданному числу N.
Все в Pascal. Очень прошу помочь
двузначных чисел в диапазоне от А до B, в которых первая цифра ровно в 2 раза больше второй.
НУЖНО с Basic !!!!
составьте блок-схему алгоритма и программу вычисления суммы всех трехзначных чисел , кратных 5!!
нужно с if