Var v:real;
begin
Write('Введите v, v>20,v<200: ');
Readln(v);
while (v<=20)or(v>=220) do
begin
Write('Введите v, v>20,v<200: ');
Readln(v);
end;
writeln('v = ',v);
end.
Пример:
<span>Введите v, v>20,v<200: 15
Введите v, v>20,v<200: 550
Введите v, v>20,v<200: 150
v = 150</span>
//Я сделаль
#include <bits/stdc++.h>
using namespace std;
int main()
{
cout << " 1 \n";
cout << "------\n";
cout << " M \n";
cout << " MMM \n";
cout << "MMMMM\n";
cout << " M M \n";
cout << " MMM \n";
cout << "------\n";
cout << " 2 \n";
cout << "------\n";
cout << "M \n";
cout << "MM \n";
cout << "MMMMMM\n";
cout << " MM\n";
cout << " M\n";
cout << "------\n";
cout << " 3 \n";
cout << "------\n";
cout << "M M\n";
cout << " M M \n";
cout << " MMMMM \n";
cout << " M M M \n";
cout << " MMMMM \n";
cout << "------\n";
cout << " 4 \n";
cout << "------\n";
cout << " M\n";
cout << " MM\n";
cout << " MMM\n";
cout << " MMMMM\n";
cout << "MMMMMMM\n";
cout << "------\n";
cout << " 5 \n";
cout << "------\n";
cout << "M M\n";
cout << "MM MM\n";
cout << "MMMMM\n";
cout << "MM MM\n";
cout << "M M\n";
}
Всё просто. До из суммы вычитается загаданное число. Возьмите число 0 и сами всё поймёте
program G1;
var
a:real;
begin
writeln('Сколько килограмм?');
readln(a);
a:=a*1000;
writeln('Это ',a,' грамм')
end.
"Впервые продемонстрировал огромные потенциальные возможности применения двоичной системы для вычислений ещё изобретатель логарифмов шотландский математик <span>Джон Непер (1550-1617)."
</span>В 1617 году Джон Непер <span>изобрел </span>счетное устройство (па́лочки Не́пера, или не́перовы па́лочки), призванное облегчить арифметические вычисления. Устройство состояло из брусков с нанесенными на них цифрами от 0 до 9 и кратными им числами. Для умножения какого-либо числа бруски располагали рядом так, чтобы цифры на торцах составляли это число. Ответ можно было увидеть на боковых сторонах брусков. Помимо умножения, палочки Непера позволяли выполнять деление и извлечение квадратного корня.
Гутер Р. С., Полунов Ю. Л. Двоичная арифметика в инструментальном счете у Джона Непера // Историко-математические исследования. Вып. 23. М.: Наука, 1978. С. 156-167.