Форум школьного программирования , решение задач на турбо паскале , решебник по информатике |
Привет, Гость! Войдите или зарегистрируйтесь.
Вы здесь » Форум школьного программирования , решение задач на турбо паскале , решебник по информатике » Решение задач на turbo pascal » Одномерный массив , умножение на число
Умножение любого двухзначного числа на 11
var
i: integer;
begin
repeat
Write('Введите 2-значное число: ');
Readln(i)
until i in [10..99];
Writeln(i, ' * 11 = ', i * 11);
Readln
end.
Вы здесь » Форум школьного программирования , решение задач на турбо паскале , решебник по информатике » Решение задач на turbo pascal » Одномерный массив , умножение на число