4 года назад

Создайте программу которая выводит на экран числа от 100 до 115.. Паскаль (

Знания

Информатика

2 ответа:

Раис Нурпейсов4 года назад

0 0

Решение данной задачи смотрите в прикрепленном скриншоте:

Mohmad4 года назад

0 0

// PascalABC.NET 3.2, сборка 1509 от 27.07.2017
// Внимание! Если программа не работает, обновите версию!

begin
Range(100,115).Println
end.

Результат
100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115

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

Даны два массива, заполненные каждый десятью случайными целыми числами, каждое из которых от 15 до 40 включительно. Третий масси

Ания [4]

И в чем вопрос? сделай 2 массива. Заполни с помощью randomize укажи пределы. Далее в зависимости от среды разработки посмотри есть ли возможность найти разность с помощью функции. если нет то поэлементо вычитай из массива а элемент массива б и записывай в массив с

0 0

3 года назад

Помогите перевести слово "Компьютер" в мегабайты или в байты. Заранее спасибо.

Трифонова Ирина В...

1 знак=8 бит
9*8=72бит=9байт

0 0

3 года назад

Прочитать ещё 2 ответа

придумайте примеры отношений "является элементом множества","входит в состав","предшествует",и представьте их с помощью схем

ленивый поиск [12]

Ученик является элементом множества Класс
Водород входит в состав воды. 
Среда предшествует четвергу.

0 0

4 года назад

1. Дан массив натуральных чисел. Напечатать все элементы массива,являющиеся двузначными числами. 2. Дан массив. Напечатать четны

babis812

for i := 1 to n do

read(a[i]);

for i := 1 to n do

if (a[i] div 100 = 0)and(a[i] div 10 > 0) then

write(a[i], ' ');

for i := 1 to n do

read(a[i]);

for i := 1 to n do

if (a[i] mod 2 = 0) then

write(a[i], ' ');

for i := 1 to n do

read(a[i]);

for i := 1 to n do

if (a[i] mod 2 = 0)then

a[i] := a[i]*2

else

a[i] := a[i] - 1;

for i := 1 to n do

wirte(a[i]);

0 0

4 года назад

(Pascal) Задать координаты точки и вывести, принадлежит ли точка заштрихованной (желтой) области или нет.

Алия Наконечная [6]

Var x,y:real;
begin
write('x=');readln(x);
write('y=');readln(y);
if (x*x+y*y<=1)and(y>=x)and(y<=-x+1)
then writeln('Точка принадлежит заштрихованной области')
else writeln('Точка не принадлежит заштрихованной области');
end.

0 0

1 год назад