Var x,y,s,s1:integer;
begin
s:=0;s1:=0;
for x:=-3 to 3 do begin
if x<0 then s:=s+sqr(x);
if x>=0 then s1:=s1+x*sqr(x);
end;
writeln('s=',s);
writeln('s1=',s1);
end.
var
a,b:integer;
begin
writeln('Введите значение a: ');
readln(a);
writeln('Введите значение b: ');
readln(b);
writeln('a + b = ',a+b);
writeln('a - b = ',a-b);
writeln('a * b = ',a*b);
writeln('a / b = ',a/b);
end.
Перевод информации из понятной компьютеру или цифровой, в другой вид информации понятной например людям или возможно дельфинам)
Примеры устройств вывода: колонки, принтер, монитор
1)(48 *1024 *8) : (64*64*8) = 393216 : 32768 = 12 стр
48 Кбайт = 48*1024*8 = 393 216 бит
64 стр * 64 симв = 4096 симв на 1 стр
2) Емеля? :) Вторая буква - согл, последняя - гласная
#include <stdio.h>
#include <stdlib.h>
int main()
{
int n, f=0;
scanf ("%d", &n);
int a[n];
srand (time(NULL));
for (int i = 0; i < n; i++ )
{
a[i] = rand() % 20 -10;
printf ("%4d ", a[i]);
}
printf("\n");
for (int i = 0; i < n; i++ )
if (a[i]==0) f++;
if (f>0) printf("YES");
else printf("NO");
return 0;
}
Пример:
10
<span> -1 -4 0 1 2 5 -7 -8 5 6
YES</span>