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

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

Ответы

1) X1*X1=X1 (закон повторения). Имеем:

2) Раскрываем скобки:

3) X1*X3+X1*X3=X1*X3 (a+a=a — тот же закон повторения, только для сложения). Применяем и имеем:

4) Х1*Х2+Х2=X2 (правило склеивания). Имеем:

Решено. Все законы нетрудно проверить подставляя 0 или 1

S — площадь кольца
Взято число Пи, равное 3,14.
Язык программирования: Паскаль

var
S, r1, r2 : real;
begin
readln (r1);
readln (r2);
S := 3.14 * (SQR(r1) — SQR(r2));;
writeln (S);
end.

Презентация была опубликована 4 года назад пользователемЖанна Селезнёва

Похожие презентации

Презентация на тему: " Программирование на языке Паскаль Строковый тип данных." — Транскрипт:

1 Программирование на языке Паскаль Строковый тип данных

2 Строковые константы и переменные Строка – это последовательность символов. Каждый символ занимает 1 байт памяти (код ASCII). Количество символов в строке называется её длиной. Длина строки может находиться в диапазоне от 0 до 255. Строковая константа – это последовательность символов, заключённая в апострофы. Пример: Язык программирования Паскаль Описание строковой переменной Var : string[N]; Пример: Var name: string[20]; adr: string; <параметр длины может не указываться>Длина строки

3 Строковые выражения Тип string и тип char совместимы и могут употребляться в одних и тех же выражениях. Строковые выражения строятся из строковых констант, переменных, функций и знаков операций. Над строковыми данными допустимы операции сцепления (+) и операции отношения (=, <>, >, =, PASCAL True Ключ <>Ключ True MS DOS=MS DOS True , >, =, PASCAL True Ключ <>Ключ True MS DOS=MS DOS True">

4 Строковые функции Функция Значение SВыражение Результат Copy(S,Pos,N) Выделяет из строки S подстроку длиной N символов, начиная с позиции Pos ABCDEFGCopy(S,2,3)BCD Concat(S1,S2,…SN) Выполняет сцепление строк S1,S2,…,S3 AAConcat(S,XX,y)AAXXy Length(S) Определяет длину строки S (A+B)*CLength(s)7 Pos(S1,S) Обнаруживает первое появление в строке S подстроки S1 abcdefPos(cd,S)3

Читайте также:  Что дает внешняя звуковая карта

5 Строковые процедуры Процедура Исходное SВыражение Результат S Delete(S,Pos,N) Выполняет удаление N символов из строки S, начиная с позиции Pos abcdefgDelete(S,3,2)abefg Insert(S1,S,Pos) Выполняет вставку строки S1 в строку S, начиная с позиции Pos ЭВМ PCInsert(IBM-,S,5)ЭВМ IBM-PC

6 Задача Получить из слова «ВЕЛИЧИНА» слово «НАЛИЧИЕ». Программа Program Slovo_1; Var S1,S2: string[10]; Begin S1:=ВЕЛИЧИНА; S2:=copy(S1,7,2)+copy(S1,3,4)+S1[2]; Writeln(S2); End. Program Slovo_1; Var S1,S2: string[10]; Begin S1:=ВЕЛИЧИНА; S2:=copy(S1,7,2)+copy(S1,3,4)+S1[2]; Writeln(S2); End.

7 Задача Получить из слова «СТРОКА» слово «СЕТКА». Программа Program Slovo_2; Var S1: string[10]; Begin S1:=СТРОКА; Delete(S1,3,2); Insert(Е,S1,2); Writeln(S2); End. Program Slovo_2; Var S1: string[10]; Begin S1:=СТРОКА; Delete(S1,3,2); Insert(Е,S1,2); Writeln(S2); End.

8 Задача Составить программу, которая формирует символьную строку, состоящую из n звёздочек ( 0

9 Задачи 1 Составить программу получения из слова «дисковод» слова «воск», используя операцию сцепления и функцию Copy. 2 Составить программу получения слова «правило» из слова «операция», используя процедурыDelete и Insert. 3 В данном слове заменить первый и последний символы на «*».

Ответ

Проверено экспертом

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
var s:=’дисковод’;
Writeln(Copy(s,6,2)+Copy(s,3,2))
end.

Ссылка на основную публикацию
Adblock detector