Ветвления на Паскале.
Программирование
диалога с компьютером.
1. Составьте на Паскале программу определения минимума из трёх чисел с использованием логических операций. Программа должна иметь дружественный интерфейс.
program minimum;
var A,B,C,D: real;
readln (A,B,C)
if (A<=B) and (A<=C) then D:=A;
if (B<=A) and (B<=C) then D:=B;
if (C<=A) and (C<=B) then D:=C;
writeln(«Наименьшее число»;D);
2. Составьте на Паскале программу, которая запрашивает возраст двух детей (Саши и Маши), а затем выводит информацию о том, кто из них старше.
program Age;
var S,M:integer;
write(«Возраст Саши»);
write(«Возраст Маши»);
if M>S then writeln(«Маша старше»);
if S>M then writeln(«Саша страше»);
3. Запишите на языке Паскаль программу, которая по номеру дня недели будет выводить его название.
program day;
var D:integer;
Aliens — UFOs — What if the Whistleblowers are Telling the Truth..?
write(«Введите номер дня недели»);
Источник: satanapechetbliny.blogspot.com
Контрольная работа по теме «Введение в программирование на языке Turbo Pascal» (9 класс)
Контрольная работа по теме «Введение в программирование на языке Turbo Pascal». 1 вариант.
Что выполняет данная команда READLN(dr);
Целый тип данных __________
Раздел описания переменных начинается со слова _______
D:=SQR(4); Чему равно значение переменной D?
Какая программа выдаст ошибку выполнения? (предполагается, что числа s, f, a лежат в интервале от -1000 до 1000, а
·0)
Var s, f, a: integer;
Begin
S:=f/a;
End.
(b) Var s, f, a: integer;
Begin
S:=f+a;
End.
(c) Var s, f, a: integer;
Begin
S:=f-a;
End.
(d) Var s, f, a: integer;
Begin
S:=f*a;
End.
Чему равно значение переменной d? d:= 14 mod 3
Что делает эта программа?
Program Example;
Var a, b, S: Integer;
Begin
Writeln (Введите 2 числа’);
Readln (a,b);
S:=2*(a+b);
Writeln (S);
Readln;
End.
а) находит периметр прямоугольника b) находит площадь квадрата;
c) находит площадь прямоугольника; d) находит площадь круга.
Чему равно значение переменной s? D:= 12 div 5 s:= D+9
Чем заканчивается любая программа, записанная на языке Паскаль.
С помощью какой команды можно вывести значение переменной G на экран дисплея?
С какого слова начинается тело программы, т.е. набор команд, которые выполняются при запуске программы?
Для чего предназначен оператор Writeln?
а) для ввода данных с клавиатуры; b) для ввода числовых данных;
c) для печати результатов на принтере; d) для вывода на экран.
Назовите полный условный оператор на Паскале.
Определить тип синтаксической ошибки в программе.
Home Automation: How to use 7 Program 0.1s to 9999 minutes Relay Timer XY-LJ02
program A;
var b, c: integer;
begin
readln (b);
if b>=0 then c:=b*b; else c:=-b*b*b;
writeln (c=’, c);
end.
А) неописанный идентификатор;
В) ошибка в записи оператора;
С) неверная константа;
D) ожидается BEGIN.
Как читается данная запись? F:=125;
Указать значения величин A и B после выполнения следующих операторов присваивания.
A:=5.8;
B:=-7.9;
B:=A;
A:=B;
Контрольная работа по теме «Введение в программирование на языке Turbo Pascal». 2 вариант.
Что выполняет данная команда WRITELN(dr);
Вещественный тип данных _________
Раздел описания операторов начинается со слова _______
N:=SQR(5); Чему равно значение переменной N?
Какая программа выдаст ошибку выполнения? (предполагается, что числа c, b, x лежат в интервале от -1000 до 1000, x
·0)
(a)Var c, b, x: integer;
Begin
C:=b*x;
End.
(b)Var c, b, x: integer;
Begin
C:=b+x;
End.
(c)Var c, b, x: integer;
Begin
C:=b-x;
End.
(d)Var c, b, x: integer;
Begin
C:=b/x;
End.
Чему равно значение переменной s? s:= 14 div 3
Что делает эта программа?
Program Example;
Var a, b, S: Integer;
Begin
Writeln (Введите 2 числа’);
Readln (a,b);
S:=a*b;
Writeln (S);
Readln;
End.
а) находит периметр квадрата; b) находит площадь квадрата;
c) находит площадь прямоугольника; d) находит площадь круга.
Чему равно значение переменной s ? D:= 12 mod 5; s:= D+7;
Чем заканчивается любая программа, записанная на языке Паскаль.
С помощью какой команды можно ввести значение переменной G на экран дисплея?
С какого слова начинается раздел описания переменных?
Как называется оператор := ?
Что вычисляет функция MOD?
а) Остаток от деления; b) Модуль числа;
c) Квадратный корень; d) Определяет знак числа.
Выбрать фрагмент программы на Паскале, в котором переменной у присваивается значение, равное 0, если -5 -5 then if x 5 then y:=1 else y:=0;
C) y:=1; if x>-5 then if x -5 then if x
Источник: lib-5.ru
Что делаеть это программа?
Program Example;
Var a, b, S:Integer;
Begin
Writeln (‘Введите 2 числа’);
Readln (a, b);
S:=a*b
Writeln (S)
Readln;
End.
2 Смотреть ответы Добавь ответ +10 баллов
Ответы 2
Ответ разместил: gegamkherunts
Доступ после просмотра рекламы
Ответы будут доступны после просмотра рекламы
Показать ответы
Да, это программа
Удалить ответ +1 балл
Ответ разместил: kari65
Доступ после просмотра рекламы
Ответы будут доступны после просмотра рекламы
Показать ответы
Пользователь вводит два числа (a,b). Программа перемножает числа a и b, заносит результат в переменную S и выводит ёё значение.
Удалить ответ +1 балл
Другие вопросы по Информатике
Информатика, Елизавета11011
Задан массив a[1..15]. составьте программу, которая выводит разность сумм элементов массива четными индексами и элементов массива с нечетными индексами. на языке турбо каскаль.
Информатика, elizaveta2001kz
По html конструированию. не представляю как это делать по некоторым причинам, но надо.
Информатика, никтошшшников
Написать программу на vba для вычисления суммы числового ряда 0; 3; 8; 15; 24; 35; 48; 63; 80; 99.
Информатика, дилирон1
Статья, набранная на компьютере, содержит 16 страницы, на каждой странице 40 строк, в каждой строке 48 символов. определите размер статьи кои-8, в которой каждый символ кодируется.
Информатика, elenabeloglazo
Определите порядок действий для создании группы из моделей.
Информатика, помогите1165
98 переаедите с паскаля на питон program zadbl; uses crt; var a,b,c,i,s: integer; m: array[1..30] of integer; begin s: =-1; for i: =1 to 30 do begin .
Источник: 0tvet.com