Бикенчу - учебник
гикна - книга
курицль - циркуль
<span>ражлун - журнал
</span>Циркуль лишнее, не носитель информации.
var a,a1,a2,a3 : integer;
begin
readln(a);
a1:=a div 100;
a2:=(a mod 100) div 10;
a3:=(a mod 100) mod 10;
writeln(a1+a2+a3);
end.
а - само число, а1-число сотен, а2-число десятков, а3-число единиц
#include <iostream>
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian");
float a, b, x;
cout << "Введите a и b: " << endl;
cin >> a;
cin >> b;
x = b / a;
cout << x;
}
Var
number: integer;
k: integer;
begin
repeat
write('number = ');
readln(number);
if number < 0 then k := k + 1;
until number = 0;
writeln('Кол-во отрицательных = ', k);
end.