Var
a, b: real;
begin
writeln('ax + b = 0. Enter a and b =>');
read(a, b);
writeln(-b / a);
end.
Таблица - см. рисунок.
Формулы:
=ЕСЛИ(И(C2<=13;D2>=160);"+";"-")
=СЧЁТЕСЛИ(E2:E6;"+")
Ответ:
Write() и Writeln() - вывод текста на экран
Read() и Readln() - запись текста с клавиатуры
Приписка ln обозначает, что нужно отступить строчку после команды
Var i, k: integer;
begin
for i := 15 to 125 do
if (i mod 2 = 0) and (i mod 3 = 0) then write(i, '; ');
<span>end.</span>
#include <iostream>
using namespace std;
int main()
{
string t, s="";
cout << "t = ", cin >> t, cout << endl;
for(int i=0; i<t.length(); i++)
if(t[i] != 'a') s = s+t[i];
else s = s+'p'+t[i]+'p';
cout << s << endl;
return 0;
}
Пример:
t = <span>aleksandr
</span>paplekspapndr