Который раз повторяю, указывайте на каком языке нужно писать программу. По классике написала на Pascal:
program ff;
var
x : integer;
begin
Write('Введите число ');
Readln(x);
if x mod 2 = 0 then writeln(x/2)
else writeln(sqr(x));
end.
program chizla;
var k,x,i,a:integer;
begin
x:=0;
k:=0;
writeln ('Введите числа');
for i:=1 to 10 do
begin
readln(a);
if a<0 then
k:=k+1;
if a>0 then
x:=x+1;
end;
writeln('Положительных ',x,' Отрицательных ',k);
end.
Комменты в коде По пунктам:
C++Выделить код
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 #include <iostream> #include <stdio.h> #include <string> #include <fstream> #include <Windows.h> int main() { std::fstream myfile; std::string parse_string,word; std::string::size_type beg_idx = 0, end_idx = 0; const std::string delim_string (" "); int howManyStrings = 0; bool onlyTwo = true; myfile.open("file.txt",std::ifstream::in); while(!myfile.eof()) { beg_idx = 0, end_idx = 0; getline(myfile,parse_string); //Ваш 2й пункт. howManyStrings++; //Ваш 1й пункт. 11 11 22 55 33 66 88 44 99 111 222 5555 8888 77 99
SetBrushHatch, принимает параметр - стиль штриховки. Подробности - в справке по ABCGraph, подраздел "Подпрограммы для работы с кистью". Это установка вида штриховки. А сама штриховка получится при обычной заливке. Или заливке ранее нарисованного контура, или при рисовании фигуры с заливкой. Этих команд много.