Вопрос: Информатика паскаль. Наша лабораторная 1/x | Onpioneer

Информатика паскаль. Наша лабораторная 1/x

danil sharipov
Везет вам… А у меня вот нет лабораторных (Imobilazer1
Всего 3 ответа.

Другие интересные вопросы и ответы

Помогите решить задачу по информатике, Паскаль?

Питер и Мика хорошие друзья и коллеги по работе, очень сложной, ответственной и к тому ещё засекреченной работе, о которой нам, увы, нельзя ничего говорить в целях защиты серьёзного дела, которым они занимаются. Однажды они собрались, чтобы сыграть в одну очень интересную игру. На столе лежит N карточек в ряд, на каждой написано некоторое число. Питер и Мика по очереди их вытягивают, начиная с самой левой карты и заканчивая самой правой. Первой начинает Мика. Достав определённую карточку, Мика записывает число на ней (умноженное на 2) себе на листик. Затем карточку тянет Питер и записывает вытянутое число в свой листик только уже умноженное на 3. После Питера, карточку опять тянет Мика, дописав новое число, умноженное на 4, в свой листок и так далее, пока не закончатся все карточки, находящиеся на столе. После, каждый игрок подсчитывает сумму чисел, которую он получил. Выигрывает тот, у кого она больше. Питер и Мика очень занятые люди и они не хотят терять время понапрасну, например, на подсчёты заработанных очков. Поэтому они обратились к вам за помощью. Формат ввода: В первой строке находится целое число N (1 ≤ N ≤ 100) – количество карточек, выложенных на столе. Во второй строке находятся N чисел (a1, a2, a3, … , aN) – целые числа, записанные на карточках. По модулю не превышают 1 000 000. Формат вывода: В единственной строке вывода должно содержаться одно слово: “Won”, если выиграл Питер или “Lost”, если выиграла Мика. В случае одинакового количества набранных баллов выведите символ “?”.

БородкаБарри1

Programm DummyGame;

uses Crt;

var NumCards, i : integer;

n : array [1..100] of longint;

Mika, Pit : longint;

BEGIN

Mika:=0;

Pit:=0;

write(«Введите число карточек (1-100) : «;

readln(NumCards);

writeln(«Вводите числа на карточках :»);

for i:=1 to NumCards

begin

write(«Карточка №», i:4);

readln(n[i]);

end;

write(«Идёт рассчёт»);

for i:=1 to NumCardsd

begin

write(«.»);

if 2*Int(i/2)-i=1

then Mika:=Mika+n[i]*(i+1)

else Pit:=Pit++n[i]*(i+1);

end;

writeln;

if Pit>Mika

then writeln(«Won)

else if Pit<Mika

then writeln!»Lost’)

else writeln(«?»);

END.

ВасВа­с3
Всего 1 ответ.[my_custom_ad_shortcode1]

Решаю задачу по информатике Pascal. Требуется массив, имеющий в себе кол-во членов от 1 до x.

X — число, которое выявится рандомом. Но как бы я не пытался записать в массив что-то кроме числа, например array[1..n], выявляется ошибка, «Ожидалось константное значение». Прошу помочь в реализации. Информатика за 9 класс.Guest7

Нужно использовать динамический массив для этого
var
mas : array of integer;
n : integer;
begin
n := random(50); // случайное число от 0 до 49
setlength(mas,n); // устанавливаем массив в случайное число, созданный массив нумеруется с нуля
// делаем другие дела
end;

Гость4
Всего 1 ответ.

Какое число будет напечатано в результате выполнения программы

Гость4

В результате выполнения программы будет напечатано число 20.

Lady in Red1
Всего 1 ответ.

Возможно ли изучить программирование за лето?

Айдар Храмов32

Смотря что ты хочешь изучить и что имеешь ввиду под программированием.

Если html+css — да, вполне возможно. Но это верстка а не программирование. SQL — так же возможно, но и работу с БД я так же не могу назвать настоящим программированием.

Если же брать серьезное программирование — однозначное нет. Минимум год самообучения по 8-12 часов в день. Минимум — если у тебя уже есть некая база и неплохо поставленная логика. Значительно больше если нет.
У меня была очень сильная база (я несколько лет работал в IT конторе мирового масштаба(входит в первую десятку по размеру) международной тех.поддержкой высшего уровня[там было 5 таких] а так же QA[тестировщиком], а так же некую базу программирования уже имел), но у меня пошло пол года по 8-12 часов в день что бы достичь некоего более-менее неплохого уровня на C#. По факту недостаточного что бы работать полноценным программистом. Но все же достаточного для автоматизации.

Реальное программирование — это не просто синтаксис языка. Программирование — это умение решать задачи. Как математические так и логические. Логические — в первую очередь! А так же знание ряда алгоритмов. А так же знание инструментов которыми пользуешься(например нужно понимать как внутри устроен List/LinkedList и Array для того,что бы их правильно оптимально использовать, просто знать что длинна аррея не меняется — НЕ ДОСТАТОЧНО). Синтаксиса языка НЕ ДОСТАТОЧНО кто бы тебе не говорил обратного.

Что бы не быть баснословным, я наведу простой пример использования алгоритмов:

Алгоритм среднего между 2мя целыми числами нормального человека:
(a+b)/2
алгоритм среднего из 2х целых чисел программиста(умного, а не в кавычках):
a/2+b/2+(a%2+b%2)/2
где % — вычисление остачи от деления.

потому как первый алгоритм даст ровно в половине из возможных случаев неправильный ответет из-за переполнения памяти + еще в четверти случаях просто на одиницу меньше нужного. Заметьте! Не ошибку! А неправильный ответ в трех случаях из 4х! А «программист»(именно в кавычках) еще и не будет в курсе почему так 🙂

Для нецелочисленного типа данных(double, float) проще:
a/2+b/2

Как видишь, проблема не в синтаксисе как таковом 🙂 Выучить синтаксис — как раз наименьшая из проблем. Хотя, замечу, что, даже, это для многих будет непосильной задачей.

С другой стороны — я за то что бы не грузить человека «паттернами» и излишними алгоритмами. На новичков это подействует, скорее всего, негативно, чем позитивно. Типа…. «я слышал про паттерн ____________, вот задача на которую КАЖЕТСЯ подойдет он.» А потом решение задачи усложняется в разы. Ну или затягивается. Паттерны нужно не только знать, но и применять с умом. К алгоритмам так же нужны знания как и когда их лучше применять. Поэтому — БЕЗ ФАНАТИЗМА.

PS: человек снизу, который меня активно критикует(Jone Done), даже путает среду разработки и язык… Delphi — это не язык, а IDE, а язык там это Object Pascal.
Так же там в коментариях у нее я проверил ее «нормальные знания джавы»… Желающие посмотреть на «номально выучившую язык за 2,5 месяца» смотреть туда. И это при том что Я ДЖАВУ НЕ ЗНАЮ, а, так, посмотрел инфу не более чем 3 дня где-то пол года назад просто для общего развития и что бы лично сложить свое собственное мнение по языку.

Валерій Пістольний49
Всего 8 ответов.

Pascal Karrie

Гость6
Wohn mit dem dicken zsmPascal Muschimaltatsch2
Всего 1 ответ.
Вам также может понравиться
Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *