uses crt;
var
n:integer;
begin
n:=0;
repeat
n:=n+3;
until keypressed;
write(n);
end.
//PascalABC.Net 3.2
begin
var n:=readinteger('Число апельсинов: ')*150;
var m:=readinteger('Число яблок: ')*100;
if m=n then write('Что угодно') else
if m>n then write('Лучше взять яблоки') else write('Лучше взять апельсины');
end.
Int a[5][7];
...
int s = 0;
for (int i = 0; i < 5; ++i)
for (int j = 0; j < 7; ++j)
s += a[i][j];
std::cout<<s;
написание краткого содержания параграфа текста, так как человек прочитал это и уже работает с прочитаным
#include <iostream>
using namespace std;
int main() {
<span> int a;
cin >> a;
if (a==3)
{
cout << "Win";
}
else </span>if (a==0)
{
cout << "Defeat";
}
else if (a==1)
{
cout << "Draw";
}
else cout << "Unknown";
<span> return 0;
</span>}