Переведите на , var x, y, b: integer; begin write ('y = x*b '); readln (x); if x > 0 then y : = y * b else if x = 0 then y : = 0 else y : = abs(x); writeln ('y = ', y = x*b); end.
Если я понял о чем ты, то вот: var x, y, b: integer; // описание переменных
begin // начало программы write ('y = x*b '); read(x,b); // ввод переменной x,b
if x > 0 // проверка, х больше от 0? then y := y * b // если да, то исполняется это else if x = 0 then //если нет, то это(тут опять же проверка, х равно 0?) y := 0 // если да то "y" присваивается 0 else y := abs(x); // если нет то "y" присваивается значение модуль "х"
#include <iostream> #include <string> int main() { using namespace std;
//1й пункт string s1 = "Computer programming (often shortened to programming) is a process"; for (int i = 2; i < s1.size(); i = i + 3) cout << s1[i]; cout << endl;
//2й пункт string s2 = "Programming involves activities such as analysis, developing understanding"; for (int i = 1; i < s2.size(); i = i + 2) if (s2[i] != 'a' && s2[i] != 'b') s2[i] = 'a'; else s2[i] = 'c'; cout << s2 << endl;
var
x, y, b: integer; // описание переменных
begin // начало программы
write ('y = x*b ');
read(x,b); // ввод переменной x,b
if x > 0 // проверка, х больше от 0?
then
y := y * b // если да, то исполняется это
else
if x = 0 then //если нет, то это(тут опять же проверка, х равно 0?)
y := 0 // если да то "y" присваивается 0
else
y := abs(x); // если нет то "y" присваивается значение модуль "х"
writeln ('y = ', y); // выводятся значения,
end. // завершение программы