0.355=3×10в -1 степени+5×10в -2 степени+5×10в -3 степени
-1, -2 и -3 это степени у десяток
Alt+Tab можно удерживать видя последовательность окон
Var
a, b: real;
begin
writeln('ax + b = 0. Enter a and b =>');
read(a, b);
writeln(-b / a);
end.
Такое же задавали, только в эл. виде делать)
Program test
var
c: integer
begin
readln(c);
if c mod 2 = 0 then writeln("Четное");
else writeln("Нечетное");
end.
Не особо шарю в паскале, поэтому на всякий случай вот на С++:
#include <iostream>
using namespace std;
int main()
{
int c;
cin >> c;
if(c%2 == 0) cout << "Четное";
else cout << "Нечетное";
return 0;
}