galustyanvitaly4842
?>

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

Информатика

Ответы

Petrushin482
Командная строка. это строка заведует управлениями всех программ
d43irina
Количество слов будет на единицу больше количества пробелов, если пользоваться традиционным алгоритмом.

1. Традиционное решение.

// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
var
  s:string;
  i,k:integer;
begin
  Write('Введите строку: '); Readln(s);
  k:=0;
  for i:=1 to Length(s) do
    if s[i]=' ' then Inc(k);
  Writeln('Количество слов равно ',k+1)
end.

Результат выполнения программы:
Введите строку: А роза упала на лапу Азора
Количество слов равно 6

2. Решение срeдствами PascalABC.Net 3.1

// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
  var s:=ReadlnString('Введите строку:');
  Writeln('Количество слов равно ',s.ToWords.Count)
end.

Результат выполнения программы:
Введите строку: А роза упала на лапу Азора
Количество слов равно 6
bulenbeiser

а) var x,y: real;

б) var a,b,s: real;

(a,b - стороны прямоугольника, s - площадь прямоугольника)

в) var k:integer;

ct,co,s: real;

(k - количество тетрадей, ct,co - стоимость 1 тетради и 1 обложки (соответственно), s - стоимости покупки)

г) var kt,kk,kr:integer;

ct,ck,cr,s: real;

(kt,kk,kr - количество тетрадей, карандашей и ручек (соответственно), ct,ck,cr - стоимость 1 тетради, 1 карандаша и 1 ручки (соответственно), s - стоимость покупки)


Данные вещественного (real) типа используются значительно чаще целого типа. Они необходимы в тех случаях, когда числовые значения могут содержать дробные части.

Данные целочисленного (integer) типа используются для представления целых чисел.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Какая строка будет выведена на экран в результате выполнения программы
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

rodsher7740
Yurevich1291
igevskoemuseumkec
Vitalevna1186
ИринаАлександровна
optikaleks7
sedalex
mariavayda88734
anovikovsr
volkovaekaterina303
Natali-0706
Shaubnatali
gena1981007
ladykalmikova81
Tatyana1426