Составьте программу,
5-9 класс
|
которая задает вопрос: «В каком году был основан город Минск?» (например, в
1067 г., в 993 г. или в 1147 г.). В случае верного ответа программа должна
сообщить «Верно», в противном случае «Вы ошиблись».
program НАЗВАНИЕ ПРОГРАММЫ;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
a:integer;
begin
writeln('Enter the founding year of Minsk');
readln(a);
if (a=1067) then writeln('Right')
else writeln('You make a mistake');
readln;
end.
НАЗВАНИЕ ПРОГРАММЫ - поменяйте на название программы.
Минск, вроде, основан в 1067 году, если не прав, то поправьте программу. Вместо 1067 введите год основания.
Другие вопросы из категории
закодированы буквами от А до Ж. Запишите последовательность этих букв, кодирующую адрес указанного файла в сети Интернет. А) /Б) httpВ) ://Г) .txtД) .netЕ) mailЖ) com
Читайте также
Или
составьте программу, которая определяет на сколько в строке S слов, начинающихся на главную букву больше, чем в строке T
надо решить одну из них
2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.
2. Составить программу, которая позволяет заменить все гласные символом "*"
равносторонний,равнобедренный или какой либо другой.
Вот ещё одна
Составить программу:Даны а,b,c-целые числа.Если они большн 0-вычислите сумму их квадратов;а если хотя бы одно из них четно-вычислите их сумму и произведение.
Пожалуйста ребят.
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.