Предмет: Русский язык, автор: tmer

пожалуста!помогите только правильно ли решила

Приложения:

Ответы

Автор ответа: wuuqhu

0

7 А 8 Г Остальное правильно

tmer: спасибо

Предыдущий вопрос

Следующий вопрос

Интересные вопросы

Предмет: Русский язык, автор: arikstandoff439

помогите пожалуйста дам 20 баллов

6 лет назад

Предмет: Химия, автор: Аноним

из 5 молей кислорода под воздействием электрического тока получили озон. Определите массу озона.

6 лет назад

Предмет: Математика, автор: ivanovaalina321

Помогите решить пожалуйста 5+5•5-6

•это умножить.

6 лет назад

Предмет: Математика, автор: Аноним

(272900+17505-158+25969)*7*6=
По действиям!

9 лет назад

Предмет: Информатика, автор: utkamag

Где тут ошибка?
program dialog_test;
var a:string;k:integer;
begin
writeln('ответьте "да" или "нет" на следующие вопросы');
writeln('1.Уважайте ли Вы дружбу?');
read(a);
K:=0;
if a='да' then k:=k+1;
writeln('2.Привлекает ли вас новое?');
read(a);
if a='нет' then k:=k+1;
writeln ('3.Притворяйтесь ли вы довольным без всякой на то ричины?');
read(a);
if a='нет' then k:=k+1;
writeln('4.Меняли ли вы в детстве более 3 раз выбор своей профессии?');
read(a);
if a='нет' then k:=k+1;
writeln('5.Предпочитайте ли вы старую одежду новой?');
read(a);
if a='нет' then k:=k+1;
writeln('6.Лишались ли вы уверенности в себе, если вам предстояло решить трудную задачу');
read(a);
if a='да' then k:=k+1;
writeln ('7.Коллекционируйте ли вы что-либо');
read(a);
if a='да' then k:=k+1;
writeln('8.Часто ли вы меняете свои планы в последний момент?');
read(a);
if a='нет' then k:=k+1;
if k>=6 then writeln ('Вы уравновешенный человек');
if(k>=3) and (k<6) then writeln ('у вас изменчивое настроение.Не забывайте,что только проявляя постоянство и настойчивость , Вы будете преуспевать в жизни.');
if k<3 then writeln (' Внимание ! Почему вы не верите в себя? будьте более оптимистичны');
end.

9 лет назад