#include<iostream>
using namespace std;
1)int main() {
for (int i = 102; i <200; i+=3)
cout<<i<<' ';
return 0;
}
2) #include <string>
int main(){
cout <<"Введите название романа и фамилию его автра";
string s;
getline(cin,s);
return 0;
}
3)int main(){
double a=0.0;
for (double i = 3.0; i < 12.0: i+=1.0)
ans += (i-1)/i;
cout<<ans;
return 0;
первые две строчки без номера копируешь для каждого кода
если есть ошибки компиляции - сорян, пишу с телефона. если что пиши в сообщения, отвечу
program raf105;
const
n = 35;
var
a: array[1..30] of integer;
b: array[1..40] of integer;
c: array[1..n] of integer;
i : integer;
begin
writeln('Заполните массив A');
for i:=1 to 30 do
readln(a[i]);
writeln('Заполните массив B');
for i:=1 to 40 do
readln(b[i]);
writeln('Заполните массив C');
for i:=1 to n do
readln(c[i]);
for i:=1 to 40 do
begin
if (a[i] < 0) or (b[i] < 0) then
begin
writeln('Нет');
break
end;
if c[i] < 0 then
begin
writeln('Да');
break
end;
end;
end.
<h3>PascalABC</h3>
Var
V,r:real;
begin
readln(r);
V:=4/3*pi*r*r*r;
writeln(V);
end.