М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

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

👇
Ответ:
lazmax2000
lazmax2000
01.02.2022
var
  s : integer;
  t, t1,t2: string;
b1: boolean;
begin
  b1 := false;
  writeln('введите строку');
  readln(t);
  t2 := '';
  repeat
     p1 := pos(' ',t);
     if p1>0 then
     begin 
        t2 := copy(t,1,p1-1);
        if  length(t2)>0) then  t1 := t2 + ' ' + t1;
        delete(t,1,p1);
    end
    else if (length(t)>=1) then          //обработка кнца строки
    begin
       t2 := t;
       t1 := t2 + ' ' + t1;
       b1 := true;
     end
     else b1 := true;       // еще одна проверка, если пследний символ строки - пробел
     until (b1 = true);
    writeln('ответ ',t1)
end.
4,4(38 оценок)
Открыть все ответы
Ответ:

1) материнская плата

процессор

ОЗУ (оперативное запоминающие устройство) или оперативная память

жёсткий диск (винчестер)

блок питания

видеокарта, звуковая карта

дисковод CD-ROM или дисковод CD-RW (для компакт-дисков)

при необходимости – дисковод FDD (для гибких дисков).

2) Корпус, блок питания, мать, жесткий диск, память, проц, видюха, монитор, клава, мышь, голова, руки.

4) однопользовательская (предназначенная для использования одним пользователем) ЭВМ, имеющий эксплуатационные характеристики бытового прибора и универсальные функциональные возможности.

5) базовый комплекс управляющих и обрабатывающих программ, обеспечивающий эффективное управление аппаратными средствами компьютера, работу с файлами, ввод-вывод данных и управление ими, выполнение прикладных программ и утилит, а также взаимодействие с пользователем

6) Компьютерный вирус — это специально написанная вредоносная программа нанести ущерб данным на компьютере или вывести его из строя.

Для того чтобы не подвергнуть компьютер «заражению» вирусами и обеспечить надёжное хранение информации, необходимо соблюдать следующие простые правила:

1) установить на компьютер антивирусную программу и регулярно тестировать компьютер на наличие вирусов с её

2) регулярно обновлять антивирусную программу через Интернет;

3) перед считыванием информации со случайных носителей проверять их на наличие вирусов.

Объяснение:

третье не знаю, извини

4,6(30 оценок)
Ответ:
skidan2002
skidan2002
01.02.2022

program abc;

uses crt,graphabc;

const

name: array [1..5] of string=('ñåìÿ','ïðîðîñòîê','çåëåíûé ïðîðîñòîê','ðàñòåíèå ñ öâåòêîì','ñ ïëîäîì');

var

k:array[1..5]of integer;

i:integer;

begin

setwindowsize(300,450);

setwindowcaption('æèçíåííûé öèêë ðàñòåíèÿ');

setfontcolor(clgreen) ;

setfontsize(16);

setfontstyle(fsbold);

hidecursor;

for i:=1 to 5 do

begin

k[i]:=loadpicture('D:\pic\plant'+inttostr(i)+'.jpg');

drawpicture (k[i],0,35);

textout(50,10,name[i]);

sleep(1500);

if i<=3 then clearwindow;

end;

end.

Объяснение:

к pascal abc

4,8(38 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ