Вместо 3,45 нужно написать 3.45 (точка должна быть, а не запятая). И ещё у вас скобок многовато. Это не ошибка, просто лишние скобки загромождают запись.
Program StrokABC;
uses Crt;
var d,n,i,k:integer;
s:string;
begin
clrscr;
writeln('Введите n:');
readln(n);
repeat
clrscr;
readln(s);
until length(s)=n;
d:= length(s);
for i:=1 to d do
if (s[i]='a')and(s[i+1]='b')and(s[i+2]='c') then k:=k+1;
writeln('строка abc входит в данную строку ',k,' раз');
readkey;
end.
Идет 4 бита для черно-белых изображений на пиксель.
1. 4*4*4=64
64/8 бит = 8 байт
2. 6*4*4=96
96/8=12
3. 3*6*4=72
72/8=9 байт
Не совсем точно описал. если рандомом, то:
с++
#include<iostream.h>
int main(int argc, char* argv[])
{ setconsolecp(1251);
setconsoleoutputcp(1251);
float a,b,c;
cout<<"\nвведите 3 числа"<<endl;
cout<<'\na="; cin>>a>>endl;
cout<<"\nb="; cin>>b>>endl;
cout<<"\nc"; cin>>c>>endl;
<span>cout << </span>"RAND_MAX = " <span><< RAND_MAX << endl; </span> <span>cout << </span>"random number = " <span><< </span>rand() << endl;
cin>>rand()>>(a,b,c)>>endl;
system (pause);
return 0;
}
А где рисунки ?ааа без них не как