Все категории

4 года назад

Помогите решить 6 вариант!

Знания

Информатика

1 ответ:

БлинКарабин4 года назад

0 0

1) k, My_peremen
2) e = -5
3) -1

Читайте также

Дан массив А(м), м меньше или равно 20. Вывести на печать сумму элементов массива. если она превосходит число 50, в противном сл

николай197467

Program summa;

Uses crt;

Const m=20;

Var a:array[1..m] of integer;

i,s:integer;

Begin

For i:=1 to m do

a[i]:=random(101)-50;

For i:=1 to m do

s:=s+a[i];

If s>50 then writeln('Сумма = ',s) else

for i:= 1 to m do

Writeln('Элемент массива №',i,' равен ',a[i]);

End.

или

Program summa;

Uses crt;

Const m=20;

Var a:array[1..m] of integer;

i,s:integer;

Begin

For i:=1 to m do

Readln(a[i]);

clrscr;

For i:=1 to m do

s:=s+a[i];

If s>50 then writeln('Сумма = ',s) else

for i:= 1 to m do

Writeln('Элемент массива №',i,' равен ',a[i]);

End.

0 0

4 года назад

Каких скобок не найти на клавиатуре компьютера

снежка байрамукова

Вот этих скобок нету на клавиатуре.

0 0

4 года назад

Составьте программу по заданию + блок схема(по желанию)

killo killo

Первое задание

VARx, y : real;
BEGIN
readln(x);
if x <= -1 then y:= -1/(x*x*x)else if x <= 2 then y:= x*x else y:=-4;
writeln(y:0:8)
END.

дальше еще скину

0 0

4 года назад

Статья набранная на компьютере содержит 24 страницы, на каждой странице 32 строки, в каждой строке 60 символов. Определите инфор

Casper 24

Всего символов в статье: k=24*32*60= 46080.
Каждый символ кодируется i=8 битами или 1 байтом, значит общий информационный объем статьи будет:
I=k*i=46080*1= 46080 байт
46080 байт/1024= 45 Кбайт

Ответ№2

0 0

3 года назад

Информатика 2 вопроса

Юрий 28 [7]

Объяснение:

1. А, Г.

2. Б

___________

0 0

3 года назад