Вывести 5 раз на экран слово "Информатика" - Turbo Pascal

  1. Очень срочно нужно написать программу в Паскале и нарисовать к ней блок-схему! Тип: Арифметический цикл. Вывести 5 раз на экран слово "Информатика"!


textual

Код:

var
i:integer;
begin
for i:=0 to 4 do
writeln('Информатика!')
end.


Похожие ответы
  1. вывести фамилии, имена и отчества всех студентов мужского пола, старших 18 лет. Должна вводиться информация о студентах(фамилии, имена, отчества, пол, возраст).

  1. В массиве A[1..N] найти максимальное число и уменьшить все элементы массива на 5. Вывести полученную последовательность на экран. Помогите пожалуйста!

  1. Круг вписан в квадрат со стороной А. Определить, превышает ли площадь круга заданную величину Х и вывести сообщение на экран.

  1. ввести и вывести матрицу 4х4. Вычислить и вывести скалярные произведения первой строки на вторую, второй на третью, третьей на четвертую, а также первого столбца на второй, на третий и на четвертый.

  1. После символа «:» вставить «*», если количество символов «=» равно 5 строка вводиться пользователем

  1. Подскажите в чем ошибка? Матрица в файле txt 0 10 17 8 0 12 19 10 0 1 0 7 0 21 17 1 0 0 3 11 0 8 0 0 0 16 3 5 0 7 3 16 0 4 0 12 0 11 3 4 0 10 19 21 0 5 0 10 0

  1. Написать программу на зыке Pascal для обработки матриц. Размерности матрицы и ее элементы должны вводиться с клавиатуры. Полученная матрица и другие элементы должны выводиться на экран. Определить произведение элементов в тех столбцах, которые не содержат элементов кратных 5.

  1. Дан массив записи, представляющий собой календарь(число,месяц,год). Описать функцию подсчитывающую сколько дней прошло от первого января 2005 года до даты d этого года.

  1. ребят как посчитать средний бал и вывести ученика с такой-же оценкой как и средний бал?

  1. Здравствуйте, такая задача. Есть матрица (n на 2n) . Найти номер первой строки все элементы которой кратны 5. Использовать только цикл while. Поиск решения сделать с процедурой. Входные данные и результат выписать в текстовый файл. Я написал саму программу. Однако появилась такая проблема. После считывания данных программа не закрывается (остается висеть черным окном). После пошаговой проверки оказалось, что проблема в процедуре. Наверное, нет выхода из цикла. Помогите, пожалуйста найти ошибку.